VBS
VBS是一种由微软开发的脚本语言，它可以在Microsoft Windows上或Internet Information Server上运行。它和Visual Basic有很多相似之处，但也有一些不同之处。
VBS可以实现各种功能，例如数据类型、文件输入输出、应用程序控制等。它也可以支持类和继承等面向对象的特性。
编写脚本
- 第一种方法：
编写以下代码到down.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然后在终端中输入如下命令即可下载文件到Windows主机：
cscript down.vbs http://192.168.1.103/test/test.txt
- 第二种方法：
编写以下代码到down1.vbs文件：
url = "http://192.168.1.103/test/test.txt" '网络上的文件地址
saveas = "C:\Users\snowwolf\Desktop\test.txt" '保存成的本地文件
Set xmlhttp = CreateObject("Microsoft.XMLHTTP") '创建HTTP请求对象
Set stream = CreateObject("ADODB.Stream") '创建ADO数据流对象
Call xmlhttp.open("GET",url,False)'打开连接
Call xmlhttp.send()'发送请求
stream.mode = 3 '设置数据流为读写模式
stream.type = 1 '设置数据流为二进制模式
Call stream.open()'打开数据流
Call stream.write(xmlhttp.responsebody)'将服务器的返回报文主体内容写入数据流
Call stream.savetofile(saveas,2)'将数据流保存为文件
'释放对象
Set xmlhttp = Nothing
Set stream = Nothing然后输入以下命令即可下载：
cscript down1.vbs
- 第三种方法
编写以下代码到down2.vbs文件：
Set xPost = createObject("Microsoft.XMLHTTP")
xPost.Open "GET","http://192.168.1.103/test/test.txt",0 '下载文件的地址
xPost.Send()
Set sGet = createObject("ADODB.Stream")
sGet.Mode = 3
sGet.Type = 1
sGet.Open()
sGet.Write(xPost.responseBody)
sGet.SaveToFile "C:\Users\snowwolf\Desktop\test.txt",2 '保存文件的路径和文件名然后输入以下命令即可下载：
cscript down2.vbs
工具
混淆
- VBScript_Obfuscator
https://github.com/DoctorLai/VBScript_Obfuscator
- VBS Obfuscator in Python
https://github.com/kkar/VBS-Obfuscator-in-Python
反混淆
- vbeDecoder
https://github.com/sbruyere/vbeDecoder