采集程序设计经验交流（二）——下载网页

　　采集程序设计经验交流(二)——下载网页(1)

　　“小网站本不需要维护，只是因为你的程序太笨了，所以你成了无休止的网站维护者。”

　　网页下载方法1(XMLHTTP应用)

　　用到的对象：XMLHTTP，只需三行代码，即可完成网页下载：

　　第一步：创建对象

　　Set ms = CreateObject("Microsoft.XMLHTTP")

　　这行代码用于创建一个xmlhttp对象，其中ms为创建对象的名称，ASP编程经常用到，可以随便写，不再赘述。

　　第二步：设置参数

　　ms.open "GET",url,False

　　其中url是要下载网页的网址，把它换成你的目标网页网址即可，格式为：http://www.99jpw.cn，一定要写完整，不可省略http://;

　　“GET”是打开的方法，当然也可以用POST，产生的效果和HTML里的表单提交方式是一样的。

　　第三步：发送数据

　　ms.Send()

　　此行代码用于发送数据并下载，下载后的数据储存在变量responsebody里。

　　下面我们以下载“点点机票网(http://www.66666999.com)”首页为例进行一下说明

　　代码：

　　Set ms = CreateObject("Microsoft.XMLHTTP")

　　ms.Open "GET","http://www.99jpw.cn",False

　　ms.Send()

　　response.write ms.responseBody

　　运行以上代码大家可以发现，我们已经成功下载了http://www.66666999.com

　　这里有个问题需要注意一下，8630.html">有时候网址很长，直接加在第二行代码里会显得很乱，那么，我们可以用一个变量来代替一下，如下：

　　url="http://www.99jpw.cn"

　　Set ms = CreateObject("Microsoft.XMLHTTP")

　　ms.Open "GET",url ,False

　　ms.Send()

　　response.write ms.responseBody

　　这样以来代码就变得整齐多了。