asp防采集

asp防采集，防范asp被采集，禁止采集，防止页面被采集，asp防采集代码



<%

Dim ANUM,AC

ANUM=10 '设置每分钟最多打开的次数。

AC=Request.Cookies("AC")

If AC="" Then

response.Cookies("AC")=1

AC=1

response.cookies("AC").expires=dateadd("s",60,now())

Else

response.Cookies("AC")=AppealCount+1

response.cookies("AC").expires=dateadd("s",60,now())

End If

if int(AC)>int(ANUM) then

response.write "网站制作学习网谢谢您的青睐，请不要连续打开页面！"

response.end

End If

%>