作者:iamlaosong
我前一阵子用VBA做了两个工具,用XMLHTTP的Get功能和Post功能抓取网页数据,还用这个对象的Get功能通过HTTP接口获取数据,这儿总结一下:
1、Get功能抓取网页数据,参数名称和值放在链接之中,方法如下:通过不同的变量值(sn和en)构造不同的链接,获取不同的数据。
hp1 = "http://api.map.baidu.com/?qt=nav&c=1&sn=2$$$$$$"
hp2 = "$$$$&sy=0&ie=utf-8&oue=1&fromproduct=jsapi&res=api&callback=BMap._rd._cbk92197"
http = hp1 & sn & "$$$$&en=2$$$$$$" & en & hp2
xh.Open "get", http
xh.send
rt = xh.responseText
通过不同的变量值(sn和en)构造不同的链接,获取不同的数据。