复制代码 代码如下:
<%
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实现防止网站被采集代码内容请搜索靠谱客的其他文章。
本图文内容来源于网友提供,作为学习参考使用,或来自网络收集整理,版权属于原作者所有。
发表评论 取消回复