利用ActiveX控件

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

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

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

URL=
objInet.RequestTimeOut=20
objInet.Url=URL
StrGet=objInet.OpenURL()
Response.WriteStrGet


这不就简单了。保存成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，然后尝试那些代码时，却会得到一个类别未授权使用(Classisnotlicensedforuse)错误，错误号0x80040112。那些代码的作者似乎都以为MSWinsock和一般的控件一样，只要用regsvr32注册就能正常使用了，没有实际测试它的可移植性。而转贴文章的人，更不会关心内容是否可*，一味地复制粘贴而已。结果，网上所有关于VBS调用MSWinsock的例子都是空中楼阁，没有一个跑的起来。国内如此，国外也一样。所有对该控件无法使用的质疑，都被人以需要注册为理由打发了。当然，也有了解真相的人，但其给出的解决方案竟然是用VB重新写个ocx封装MSWinsock，这实在是@#$%^&!。

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

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

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

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

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

20051111183658185.rar