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

复制代码 代码如下:

<%

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

%>

时间: 2024-10-11 03:50:15

ASP实现防止网站被采集代码的相关文章

ASP实现防止网站被采集代码_应用技巧

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

asp.net计算网站访问量常用代码

  前台代码:  <%@ Page Language="C#" AutoEventWireup="true"   CodeFile="Default.aspx.cs" Inherits="_Default" %> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR

asp采集代码示例

下面是一侧ASP采集页面内容最基础的必备源代码,修改以下的代码需要有一定的ASP基础. 以下是引用片段:< %  '功能:asp采集代码  '作者:wangsdong  '备注:支持原创程序,请保留此信息,谢谢  url="http://sports.sina.com.cn/k/2008-09-15/04593948756.shtml"  str=getHTTPPage(url)  title=strcut(str,"<h1 id=""arti

Asp.Net获取网站截图的实例代码

这篇文章介绍了Asp.Net获取网站截图的实例代码,有需要的朋友可以参考一下   复制代码 代码如下: using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication

ASP.net中网站访问量统计方法代码_实用技巧

一.建立一个数据表IPStat用于存放用户信息 我在IPStat表中存放的用户信息只包括登录用户的IP(IP_Address),IP来源(IP_Src)和登录时间(IP_DateTime),些表的信息本人只保存一天的信息,如果要统计每个月的信息则要保存一个月.因为我不太懂对数据日志的操作,所以创建此表,所以说我笨吧,哈哈. 二.在Global.asax中获取用户信息 在Global.asax的Session_Start即新会话启用时获取有关的信息,同时在这里实现在线人数.访问总人数的增量统计,代

简单的asp采集代码教程_小偷/采集

采集开始 第一步是分析要采集的页面. 使用浏览器打开要采集的页面(如:http://sports.sina.com.cn/k/2008-09-15/04593948756.shtml,你可以其他页面),打开后,点击右键,查源文件. 第二步,找到要采集的内容所在位置. 假如我要采集这个页面上的标题和内容所在的位置: 标题在<h1 id="artibodyTitle" style="color:#03005C;">和</h1>之间 内容在<

asp 文件采集代码

asp 文件采集代码 我们用到xmlhttp来抓取远程服务器文件的内容再把它转换成相关编码 <% Function getHTTPPage(Path)         t = GetBody(Path)         getHTTPPage=BytesToBstr(t,"UTF-8") End function Function GetBody(url)         on error resume next         Set Retrieval = CreateObj

几招让你的网站免受采集之苦

如今的采集系统是一个比一个NB,站长们辛苦收集制作的网站内容总是很快出现在在另一个网站上,一个网站轻易的就被复制了又复制.有办法既不影响搜索引擎的正常收入又能解决网站被采集之苦么?答案是肯定的.     最常用的防采集方法:     1.每个文章的命名不要有任何规律,比如你的文章是<%=id%>.htm的话,请在前面或后面生成个日期,如:20070911-1234.htm,前面的就是日期了,这样对采集新手来说是非常有效的.     2.不要把所有的文章都放在一个目录下,你可以利用日期生成不同的

[原创]防止网站被采集最有效的三种方法

网站|原创|防采集 总结了一下,有三种实用的方法. 1.文章头尾加随机广告..2.文章列表加随机不同的链接标签,比如<a href="",<a class="dds" href=''3.正文头尾或列表头尾添加<!--重复特征代码--> 第一种防采集方法:下面我详细说一下这三种方法的实际应用: 如果全加上,绝对可以有效的防采集,单独加一种就可以让采集者头疼..完全可以对付通用的CMS采集程序.. 在采集时,通常都是指定头尾特征从哪到哪过滤.这里