熱點推薦:
您现在的位置: 電腦知識網 >> 編程 >> .NET編程 >> 正文

asp 防采集代碼

2013-11-13 10:37:37  來源: .NET編程 

  Dim AppealNumAppealCount
AppealNum= 同一IP秒內請求限制
AppealCount=RequestCookies("AppealCount")
If AppealCount="" Then
responseCookies("AppealCount")=
AppealCount=
responsecookies("AppealCount")expires=dateadd("s"now())
Else
responseCookies("AppealCount")=AppealCount+
responsecookies("AppealCount")expires=dateadd("s"now())
End If
if int(AppealCount)>int(AppealNum) then
responsewrite "醒您抓取很累歇一會兒吧!"
responseend
End If


From:http://tw.wingwit.com/Article/program/net/201311/14154.html
    推薦文章
    Copyright © 2005-2013 電腦知識網 Computer Knowledge   All rights reserved.