用ASP判断访问是否来自搜索引擎的函数

ReadyGo!技术成就梦想网络搜索 efish 2008-3-21 14:13:11

判断访问是否来自搜索引擎的函数，有兴趣的可以试试！

以下为引用的内容：
<%
"检查当前用户是否是蜘蛛人
Function check(user_agent)
    allow_agent=split("Baiduspider,Scooter,ia_archiver,Googlebot,FAST-WebCrawler,MSNBOT,Slurp",",")
    check_agent=false
    For agenti=lbound(allow_agent) to ubound(allow_agent)
        If instr(user_agent,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")
"check(user_agent)=true则判定访问为蜘蛛人
%>

注：本函数来源于网上，是否可用有待验证！

责任编辑: efish 参与评论查找更多：

相关文章

ASP应用:巧用SQL-DMO创建备份及校验 ASP应用:巧用SQL-DMO创建备份及校验

使用FSO自动创建多级文件夹的函数！使用FSO自动创建多级文件夹的函数！

ASP模拟MVC模型的编程方式 ASP模拟MVC模型的编程方式

ASP实例：一个简单的ASP无组件上传类 ASP实例：一个简单的ASP无组件上传类

ASP类型个人网站与动网整合非官方方法 ASP类型个人网站与动网整合非官方方法

通过实例学习ASP的对象复制通过实例学习ASP的对象复制

ASP技巧实例：ASP实现最简洁的多重查询的解决方案 ASP技巧实例：ASP实现最简洁的多重查询的解决方案

ASP技巧实例：几行代码解决防止表单重复提交 ASP技巧实例：几行代码解决防止表单重复提交

多个域名后缀同时查询的域名查询系统多个域名后缀同时查询的域名查询系统

ASP无组件上载,带进度条,多文件上载 ASP无组件上载,带进度条,多文件上载

2秒记住本站域名

玩过泡泡龙吗？Readygo?Go! 再加上.Com.Cn的后缀，那就是大名小顶的ReadyGo.com.cn

用ASP判断访问是否来自搜索引擎的函数

2秒记住本站域名

分类导航