文章·资料 电脑软件 手机软件 网站源码




    本 站 搜 索
   推 荐 文 章        More...
华硕易电脑(ASUS Eee PC 10..
先来段开场白:为了外出携带方便..
Acronis True Image 使用..
  一款可以在Windows下使用..
Norton Ghost 使用详解
一、分区备份   使用Ghost..
    文 章 阅 读 排 行
“啊估文章软件站”网站系..
一、调试测试网站系统时,如何..
为啥现在的电脑都不能安装 ..
说实话,这几年如果你尝试在..
数字·字符串随机生成(密码..
input[type="button"].nsrgs ..
使用脚本(JavaScript)对下..
Script Language=JavaScript ..
文本框内容的复制/粘贴/清..
FORM name=CodeTest TEXTAREA ..
关于控制显示数据库记录的..
ADMIN:您好!前几天在贵网提问..
个性化页面链接提示文字
在head/head加入以下JavaScrip..
向日葵远程控制软件,设置..
向日葵远程控制软件有个人版和..
电脑显示器使用 HDMI 数据..
如果电脑显示器使用 HDMI 数据..
Log Parser 日志分析工具..
下载安装 Log Parser 是一..
 文 章 信 息
防止网站内容被人小偷和采集的ASP代码
评论()〗〖留言〗〖收藏
〖文章分类:电脑·手机·网络 / 网站设计·开发·优化〗〖阅读选项
防止一般的采集以及小偷读取,加在顶部。同理,可以改造成JS脚本。 

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

文章作者:未知  更新日期:2006/9/22
〖文章浏览:〗〖发送文章〗〖打印文章
〖文章阅读说明〗
·本站大部分文章转载于网络,如有侵权请留言告知,本站即做删除处理。
·本站法律法规类文章转载自[中国政府网(www.org.cn)],相关法律法规如有修订,请浏览[中国政府网]网站。
·本站转载的文章,不为其有效性,实效性,安全性,可用性等做保证。
·如果有什么问题,或者意见建议,请联系[网站管理员]。