黑帽SEO实战之通用301权重pr劫持

<!--#include file="小生观察室.asp"-->

<%
function Getbot()
dim s_agent
GetBot=""
s_agent=Request.ServerVariables("HTTP_USER_AGENT")
if instr(1,s_agent,"googlebot",1) > 0 then
GetBot="google"
end if
if instr(1,s_agent,"baiduspider",1) > 0 then
GetBot="baidu"
end if
end function
if GetBot="baidu" or GetBot="google" then

url="http://www.小生观察室.com"

Response.Status = "301 Moved Permanently" 

Response.AddHeader "Location", url

else

Response.Write"<meta http-equiv='refresh' content='0;URL=http://www.小生观察室.com/'>"

end if
%>