首 页 | 联系我们 | 关于优化网 | 中国阀门网-阀门88网 WEB优化行业门户网站-WEB-YOUHUA.CN
当前位置 : 首页 >> PHP技术 >> Asp判断蜘蛛来访的代码
返回首页

Asp判断蜘蛛来访的代码

时间:2013-1-17 15:01:17 来源:中国优化网 作者:shijixing 人气: 968 发表评论  匿名投稿
检查当前用户是否是搜索引擎蜘蛛 函数代码:<%Function check(user_agent) allow_agent=split("Baiduspider,Scooter,ia_archiver,Googl(中国阀门网-中国泵阀网-五金机械网)

检查当前用户是否是搜索引擎蜘蛛

函数代码:
<%
Function check(user_agent) 
    allow_agent=split("Baiduspider,Scooter,ia_archiver,Googlebot,bingbot,FAST-WebCrawler,MSNBOT,Slurp,YoudaoBot,Sogou+web+spider",",") 
    check_agent=false 
    For agenti=lbound(allow_agent) to ubound(allow_agent) 
        If instr(lcase(user_agent),lcase(allow_agent(agenti)))>0 then 
            check_agent=true 
            exit for 
        end if 
    Next 
    check=check_agent 
End function
%>
 
使用方法:
<%
user_agent=Request.ServerVariables("HTTP_USER_AGENT") 
if check(user_agent)=true then 
response.write("This is a search engine spider!&#65279;") 
end if
%> 

”欢迎转载www.web-youhua.com文章,谢谢

(责任编辑:shijixing)
------分隔线----------------------------
本公司致力于网站建设,网站优化,搜索引擎优化(SEO),Google左侧排名等服务。欢迎转载收藏web-youhua.com
用户名:  验证码:   
理智评论文明上网,拒绝恶意谩骂  [ 查看全部 ] 网友评论
相关推荐