index.asp

来自「文章管理系统,生成静态网页 .」· ASP 代码 · 共 19 行

<%
Response.Expires = 0
thesoft=Request.ServerVariables("HTTP_USER_AGENT")
thesoft2=lcase(thesoft)

vpage="http://"&Request.ServerVariables("HTTP_HOST")
if instr(vpage,"213cn.com")<>0 then
	if instr(thesoft2,"googlebot")<>0 then
		Response.Status="301 Moved Permanently"
		Response.AddHeader "Location", "http://www.google.com"
	else
		Response.Status="301 Moved Permanently"
		Response.AddHeader "Location", "default.asp"
	end if
else
	Response.Status="301 Moved Permanently"
	Response.AddHeader "Location", "default.asp"
end if
%>