标题: 原创：如何写ASP入库小偷程序 [打印本页]

---

作者: ??????     时间: 2004-10-12 12:16 PM    标题: 原创：如何写ASP入库小偷程序

作者：allen
个人主页：http://www.cnmaya.org
转载请注明出自玛雅论坛


最近大家都对小偷程序感兴趣，尤其是入库类的，在这里我简单的介绍一下。希望大家对这个能有所了解，如果您还不知道什么叫小偷，请参考我写的另外一片文章（小偷程序原理和简单示例
）：http://www.im286.com/viewthread.php?tid=407182&fpage=2

个人认为小偷只是一个很通俗的说法，也给很多人带来了误解，认为小偷是什么不好的东西，其实不然，用数据采集程序来形容应该更准确些。


这里是我昨天刚完成的新浪娱乐入库小偷程序：：http://www.saynew.com/news/Class/popjb/popjb02.html
在这里我根据该程序的制作简单介绍一下：

入库小偷的原理也很简单：就是用XMLHTTP远程读取网页的内容，然后根据需要，对读到的内容进行加工（过滤，替换，分类），最后得到自己需要的数据，加入到数据库中。

首先：我们先用XMLHTTP读取远程网页（我的另一片文章中有介绍）。
其次：对内容进行过滤，这个是比较关键的步骤，比如说，我要从远程网页上提取出所有url连接，我应该怎么做呢？


  Code: [Copy to clipboard]   
‘这里用的是正则式
Set objRegExp = New Regexp   '建立对象
objRegExp.IgnoreCase = True    '大小写忽略
objRegExp.Global = True          '全局为真
objRegExp.Pattern = "http://.+?"   '匹配字段
set mm=objRegExp.Execute(str)    '执行查找，str为输入参数
For Each Match in mm      '进入循环
        Response.write(Match.Value）   '输出url地址
next



然后，我们需要根据需要做一些替换功能，把不必要的数据替换掉，这个比较简单，用Replace函数即可。
最后，进行数据库操作，这个我想大家应该都会，就不做介绍了。


暂时就想到这些，大家在实际操作中有什么问题，欢迎一起探讨，也欢迎来我的论坛一起讨论，地址是：http://www.cnmaya.org

---

欢迎光临 网普技术论坛 (http://bbs.netpu.net/)

Powered by Discuz! 2.5