最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
asp 防采集代码
时间:2022-07-02 22:38:07 编辑:袖梨 来源:一聚教程网
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 "www.111com.net醒您:抓取很累,歇一会儿吧!"
response.end
End If
相关文章
- 剑与黎明零氪萌新阵容搭配攻略 07-30
- 王者荣耀世界两生关逸事任务攻略详解 07-30
- 金铲铲之战s8怪兽入侵赛季何时返场? 07-30
- 魔兽世界征服印记购买地点-征服印记饰品在哪买 07-30
- 无畏契约好用准星推荐-准心代码大全 07-30
- 聪明开局吧第351关怎样找出19个常用字-聪明开局吧第351关找出19个常用字的过关方法 07-30