手机
当前位置:查字典教程网 >编程开发 >ASP教程 >ASP实现防止网站被采集代码
ASP实现防止网站被采集代码
摘要:复制代码代码如下:

复制代码 代码如下:

<%

Dim AppealNum,AppealCount

AppealNum=10 '同一IP60秒内请求限制10次

AppealCount=Request.Cookies("AppealCount")

If AppealCount="" Then

Response.Cookies("AppealCount")=1

AppealCount=1

Response.Cookies("AppealCount").Expires=DateAdd("s",60,Now())

Else

Response.Cookies("AppealCount")=AppealCount+1

Response.Cookies("AppealCount").Expires=DateAdd("s",60,Now())

End If

If Int(AppealCount)>Int(AppealNum) Then

Response.Write "抓取很累,歇一会儿吧!"

Response.end

End If

%>

【ASP实现防止网站被采集代码】相关文章:

用ASP实现远程批量文件改名

ASP实现网址的桌面快捷方式下载

防止网站内容被小偷采集的ASP代码

ASP整理一些实用的速查代码

ASP读取IIS日志的小程序代码

ASP无组件分页实现思路及代码

ASP编程常用的代码

asp中实现随机分组程序的代码

用ASP建立站内搜索

ASP采集入库生成本地文件的几个函数

精品推荐
分类导航