# Stupid VBS tricks I discovered...

This is dumb but I was trolling malwr.com and noticed there was a keyword for "VBS".
Uncompiled malware in a text file? Sign me up. Here are a few of the tidbits I picked up:
Here is an example of how to retrieve files from the interwebs with VBScript:

Dim oFSO: Set oFSO = CreateObject("Scripting.FileSystemObject")
a = GetRequest("https://jon.glass")
With oFSO.createTextFile("index.htm")
.Write(a)
.Close
End With
Function GetRequest(URL)
GetRequest=""
Dim o
Set o = CreateObject("MSXML2.XMLHTTP")
o.open "GET",URL, false
o.send
GetRequest=o.responseText
End Function


Here is an example of how to use VBScript to make a post :

post "jon.glass","test"
function post(cmd ,da)
post=""
UAString = "whatever the hell you want"
Dim o
Set o = CreateObject("MSXML2.XMLHTTP")
o.open "POST","http://" & cmd, false