3种获取网页源代码的方法(WEBBROWSE.INET.WSOCK)

3种获取网页源代码的方法(WEBBROWSE.INET.WSOCK)

3种获取网页源代码的方法都有其不同用途,看看你都掌握了没有?
WEBBROWSE:一般用在简单网页数据的获取,封装了COOKIES,使用方便,但是效率很低,因为要加载大量无用的LJ
INET:高效的获取网页源码控件,可以自己定义POST和GET方式,使用灵活,推荐使用
WSOCK:效率最高,但是所有东西都要自己定义

一、用Webbrowser
代码：Webbrowser.navigate (http://xxx/1.htm?name=apple&id=001)

二、用Inet (注意数据接收方式是POST还是GET ，具体的方式是在1.htm的<form>...</form>中
代码：（post方式）
1、设定数据头：
strSendHeader = "POST /hotbuy/myhotbuy.php HTTP/1.1" & vbCrLf
strSendHeader = strSendHeader & "Content-Type: application/x-www-form-urlencoded " & vbCrLf
strSendHeader = strSendHeader & "Content-Length: " & iSendLength & vbCrLf
2、设定要发的数据：
strsenddata= "name=apple&id=001"
3、发送地址：
strsendadd="http://xxx/1.htm
3、发送数据:
Inet.execute strsendadd,"POST",strsenddata,strsendHead
Inet (Get方式） GET方式比POST简单的多
代码：
strsenddata = "http://xxx/1.htm?apple&id=001"
Inet.execute strsenddata,"GET"

三、用winsock
1、设定数据头：
strSendHeader = "POST /hotbuy/myhotbuy.php HTTP/1.1" & vbCrLf
strSendHeader = strSendHeader & "Content-Type: application/x-www-form-urlencoded " & vbCrLf
strSendHeader = strSendHeader & "Content-Length: " & iSendLength & vbCrLf
2、设定要发的数据：
strsenddata= "name=apple&id=001"
strSend = strSendHeader & vbCrLf & strSendData
3、发送地址：
strsendadd="http://xxx/1.htm
4、建立连接
Winsock.RemoteHost = "http:/xxx/"
Winsock.RemotePort = 80
Winsock.Protocol = sckTCPProtocol
winsock.connect
Winsock1.SendData strsend
Winsock.close