如何使用vb.net來解析網(wǎng)頁源代碼,最終獲取所需數(shù)據(jù)

使用webbrowser控件來加載網(wǎng)頁，然后再 Private Sub WebBrowser1_DocumentCompleted下通過使用WebBrowser1.Document.Body.InnerHtml 來獲取網(wǎng)頁的源代碼，或使用 WebBrowser1.Document.Body.InnerText來獲取網(wǎng)頁中的文本。之后可以通過字符串控制指令或者正則表達式來精確獲取到你所需的數(shù)據(jù)。

網(wǎng)站建設(shè)哪家好，找創(chuàng)新互聯(lián)建站！專注于網(wǎng)頁設(shè)計、網(wǎng)站建設(shè)、微信開發(fā)、成都小程序開發(fā)、集團企業(yè)網(wǎng)站建設(shè)等服務(wù)項目。為回饋新老客戶創(chuàng)新互聯(lián)還提供了泰寧免費建站歡迎大家使用！

如何用vb.net獲得網(wǎng)頁的源代碼

Dim url As String=" 網(wǎng)址"

Dim httpReq As System.Net.HttpWebRequest

Dim httpResp As System.Net.HttpWebResponse

Dim httpURL As New System.Uri(url)

httpReq = CType(WebRequest.Create(httpURL), HttpWebRequest)

httpReq.Method = "GET"

httpResp = CType(httpReq.GetResponse(), HttpWebResponse)

httpReq.KeepAlive = False ' 獲取或設(shè)置一個值，該值指示是否與

Internet資源建立持久連接。

Dim reader As StreamReader = _

New StreamReader(httpResp.GetResponseStream,

System.Text.Encoding.GetEncoding(-0))

Dim respHTML As String = reader.ReadToEnd() 'respHTML就是網(wǎng)頁源代碼

請問如何用VB獲取網(wǎng)頁源碼

使用Inet控件獲取網(wǎng)頁源碼。

Internet Transfer 控件實現(xiàn)了兩種廣泛使用的 Internet 協(xié)議： 超文本傳送協(xié)議（HyperText Transfer

Protocol）(HTTP) 和文件傳送協(xié)議（File Transfer Protocol） (FTP)。使用 Internet Transfer

控件可以通過 OpenURL 或 Execute 方法連接到任何使用這兩個協(xié)議的站點并檢索文件。

Private?Sub?Command1_Click()

Dim?strhtml?As?String

Dim?STRURL?As?String

STRURL?=?""

strhtml?=?Inet1.OpenURL(STRURL)

Text1?=?strhtml

End?Sub

如何用vb.net獲取網(wǎng)頁源代碼

使用webbrowser控件來加載網(wǎng)頁，然后再

Private

Sub

WebBrowser

1_DocumentCompleted下通過使用WebBrowser1.Document.Body.

InnerHtml

來獲取網(wǎng)頁的源代碼，或使用

WebBrowser1.Document.Body.InnerText來獲取網(wǎng)頁中的文本。之后可以通過字符串控制指令或者

正則表達式

來精確獲取到你所需的數(shù)據(jù)。