<%

On Error Resume Next

Response.Buffer = True

Response.ExpiresAbsolute = Now() - 1

Response.Expires = 0

Response.CacheControl = "no-cache"

Response.AddHeader "Pragma", "No-Cache"

Response.Charset ="GB2312"

temp_url = "%77%77%77%2e%66%6f%72%61%73%70%2e%63%6e"'这里没有HTTp://

temp_url_array = Split(temp_url,"%")

For i = 1 To UBound(temp_url_array)

end_code = end_code& Chr(CLng("&H"&temp_url_array(i)))

Next

response.write end_code '解密后输出www.ynpxrz.com

%>

更多信息请查看IT技术专栏