当前位置：主页 > 查看内容

ASP实现防止网站被采集代码

发布时间：2021-05-27 00:00| 有 位朋友查看

简介：复制代码 代码如下: % Dim AppealNum,AppealCount AppealNum=10 '同一IP60秒内请求限制10次 AppealCount=Request.Cookies("AppealCount") If AppealCount="" Then Response.Cookies("AppealCount")=1 AppealCount=1 Response.Cookies("AppealCount").Expires……
复制代码 代码如下:

<%
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
%>

原文链接：https://m.jb51.net/article/20889.htm
本站部分内容转载于网络，版权归原作者所有，转载之目的在于传播更多优秀技术内容，如有侵权请联系QQ/微信：153890879删除，谢谢！
上一篇：ASP连接SQL2005数据库连接代码 下一篇：没有了

推荐图文

  • 周排行
  • 月排行
  • 总排行

随机推荐