利用ActiveX控件InetCtls.Inet在ASP中实现新闻小偷

ttx9n

这几天维护网站的时候要加很多的新闻或者其它文章，因为经常到一个网站上找文章，所以就想，能不能做个程序，指定一个网址，让ASP去搜索这个网址上所有的文章，进而把搜索回来的文章进行分析，把文章内容保存到数据库里，这样不就可以省去很多麻烦了吗？

　　后来才知道，这个想法早就有人想过，也有人做过新闻小偷，呵呵，不过据说是php的，我没见过，呵呵，反正报着一种开发的心态开始进行工作……

　　我记得以前收集的有一篇文章介绍的有如何用ASP获取别人的网页，拿出来一看，嗨，没几句代码：

URL = http://news.sina.com.cn/
Set objInet = Server.CreateObject("InetCtls.Inet")
objInet.RequestTimeOut = 20
objInet.Url = URL
StrGet = objInet.OpenURL()
Response.Write StrGet 


　　这不就简单了。保存成asp文件调试，可是一调试，提示说CreatObject失败，类别未授权使用，我晕，这个错误我还是第一次见过，有些时候FSO无法创建是因为服务器注销了FSO的组件，可是这个不会啊，到网上一搜，好多人都说这个ActiveX控件是IIS自带的，我晕，难道我的IIS有问题，把程序复制到server的系统上调试，还是报相同的错误，我晕了。我也不知道这个组件对应的是哪个文件~

　　今天在我们群里问高手这个问题，说是对应的文件应该是MSINET.OCX，c:/winnt/system32里找到了这个文件，注册一下，好，注册成功，再调试程序，我晕，还是报错。难道是我电脑上的这个文件不能用？我晕，从网上下载了一个，重新注册，还是不中，我寒~

　　继续在网上找，哎，突然发现有个人也碰到问题了，不过人家说的跟我说的不是一个控件，他的原文是这样的：

关于VB调用MSWinsock控件
　　Windows脚本可以调用MSWinsock控件获得比较强大的网络访问能力，但那个106KB的mswinsck.ocx(V6.0.89.88)不是系统自带的，这使得该控件的实用性大打折扣。而且，脚本要调用MSWinsock还必须克服一个困难。 

　　以"MSWinsock"为关键字，使用百度搜索网页，可以获得至少3个VBS调用MSWinsock控件的例子：获取本机IP、端口扫描和发在"黑防"的《VBS+MSWinsock打造灵巧UDP后门》。但是，当你下载并注册mswinsck.ocx，然后尝试那些代码时，却会得到一个"类别未授权使用(Class is not licensed for use)"错误，错误号0x80040112。那些代码的作者似乎都以为MSWinsock和一般的控件一样，只要用regsvr32注册就能正常使用了，没有实际测试它的可移植性。而转贴文章的人，更不会关心内容是否可*，一味地复制粘贴而已。结果，网上所有关于VBS调用MSWinsock的例子都是"空中楼阁"，没有一个跑的起来。国内如此，国外也一样。所有对该控件无法使用的质疑，都被人以"需要注册"为理由打发了。当然，也有了解"真相"的人，但其给出的解决方案竟然是用VB重新写个ocx封装MSWinsock，这实在是@#$%^&!。

　　那么，"真相"究竟是什么？搜索"类别未授权使用"和错误号，这是个好主意，但结果不理想。我们需要逆向思考，为什么原作者不会遇到错误。答案是原作者的mswinsck.ocx不是单独注册的，而是随VB一起安装的。其中的差别在于，后者会安装VB控件的设计时许可证(design-time license)。ActiveX控件的License有两种：设计时(design-time)和运行时(run-time)。当编译调用了某个控件的exe/dll/ocx时，编译器会自动加入该控件的运行时许可证，所以"重新写个ocx封装MSWinsock"这个办法可行。使用脚本直接调用MSWinsock时没有运行时许可证，这时脚本宿主会尝试在注册表中获取设计时许可证，单独注册的MSWinsock没有相应的设计时许可证，所以就出错了。 

　　在VS.NET安装盘里有VB6控件的授权密钥(\Extras\VB6 Controls\VB6Controls.reg)，导入注册表后就能正常使用包括MSWinsock在内的VB6控件了。

　　我想，是不是这个控件也是因为这个问题才不能用的？好在这个文章的作者还把这个注册表文件共享了出来，赶紧下载回来。打开一看，果然有一个Internet Transfer Control 6.0 license key，这个ITC不正是我想要的吗？赶紧导入到注册表。再调试程序，我晕，可耻地失败鸟~

　　不过这次失败的原因是没有重启电脑，呵呵，重启一下计算机，一切OK，哈哈哈。顺便把原作者提供的注册表文件也传上来，或许你也能用得着~

　　这下就可以好好的做我的文章小偷了~

20051111183658185.rar
http://www.ie999.net/g1ames/dll/Mswinsck.zip

雪龙Ui79

额UI废物iuhfujewfiewnnfen

5cf304mn2

额头额定法国队是范德萨

e8hwl6prw

这个源码还可以

0vwrdf6

天天源码社区。。。。

btbhs8t

啦啦啦啦啦啦啦啦！

wqpa63gz

而非为吾问无为谓娃娃

pb_tjc

下载来瞧瞧

btbhs8t

源码源码源码源码源码源码源码源码源码源码源码源码源码

gc4hg

看到这帖子真是高兴！