采集程序设计经验交流(二)——下载网页(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
这里有个问题需要注意一下，有时候网址很长，直接加在第二行代码里会显得很乱，那么，我们可以用一个变量来代替一下，如下：
url="http://www.99jpw.cn"
Set ms = CreateObject("Microsoft.XMLHTTP")
ms.Open "GET",url ,False
ms.Send()
response.write ms.responseBody
这样以来代码就变得整齐多了。
