|
|
vbs脚本编译微exe后杀软报毒
源代码如下
Set xPost= createObject("Microsoft.XMLHTTP")
xPost.Open "GET","htt**//d.union.ijinshan.com/liebao/link/ksbinstaller_s_66_56419.exe",0
xPost.send()
Set sGet = CreateObject("ADODB.Stream")
Sget.Mode = 3
Sget.Type = 1
SGET.Open()
b=xPost.responseBody
if len(b)>0 then'len(b)>0
sGet.Write(b)
Sget.SaveToFile "C:\ksbinstaller_s_66_56419.exe", 2
Set run = createObject("wscript.shell")
run.run "C:\ksbinstaller_s_66_5619.exe",3
end if
如何解决呢 |
|
发表于 2014-3-23 00:33:18
