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

我的地盘我做主
该用户从未签到
 |
< >解决办法: 4 G8 x$ r* }4 o4 e7 }' c& l% k
1.iget.vbs一次写入 2 N% b% A& G- A' V( z
在vbs语句的接触是符号是: 所以我们iget.vbs可以这样写 0 @3 Q. f6 ^+ P! P5 Z) D5 V7 K
, a- n. M" g/ g' k/ @2 C" U6 u; K
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
; k; L1 O! u3 J7 G8 y/ `; L a; \. m) t) t, v( S# w- V
这样我们可以一次echo成功,echo版本:
# t0 r+ P! \! G% D, z+ [, ?3 O( l- W8 E# b5 X* }( o5 {
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
0 S' I; Z x9 w6 i* o3 C4 H/ I# }% E% ^2 I, b
9 X: S6 c% U: s( S
2.bat调用ftp脚本的写法(by envymask) 6 p$ j9 c4 N7 L- {' |( G
( k9 |4 ?, C( A+ X @( j
echo ftp>1.vbs
- l2 w+ O$ e- O- r$ u+ w2 ?3 k5 r; decho open ip>2.vbs 1 ]3 m3 e. ?- |2 S
echo u>3.vbs
0 l1 j/ @" g# T4 b( E0 |echo s>4.vbs ! ` k/ g! u5 {5 `& W8 A+ e( _! ~4 V
echo binary>5.vbs
, f. @. Z$ W' j/ A1 becho get 1.exe>6.vbs
. Z% _4 i1 I# G7 ]: b- ?echo bay>7.vbs x* r; C3 h5 r4 t$ G
3 C& Q q6 y) T4 S1 fcopy 1.vbs+2.vbs+3.vbs+4.vbs+5.vbs+6.vbs+7.vbs new.vbs / B6 |6 z8 M/ n/ s4 B
</P> |
zan
|