怎么用vb.net下載到完整的web頁(yè)

這篇文章主要講解了“怎么用vb.net下載到完整的web頁(yè)”，文中的講解內(nèi)容簡(jiǎn)單清晰，易于學(xué)習(xí)與理解，下面請(qǐng)大家跟著小編的思路慢慢深入，一起來研究和學(xué)習(xí)“怎么用vb.net下載到完整的web頁(yè)”吧！

在網(wǎng)絡(luò)上找了很多關(guān)于網(wǎng)頁(yè)下載的程序但都不能完整地得到web頁(yè)的內(nèi)容，以下這個(gè)函數(shù)解決了這個(gè)問題。

    Private Function GetSource(ByVal url As String) As String
    Try
    Dim httpReq As System.Net.HttpWebRequest　'HttpWebRequest 類對(duì) WebRequest 中定義的屬性和方法提供支持'，也對(duì)使用戶能夠直接與使用 HTTP 的服務(wù)器交互的附加屬性和方法提供支持。
    Dim httpResp As System.Net.HttpWebResponse　' HttpWebResponse 類用于生成發(fā)送 HTTP 請(qǐng)求和接收 HTTP 響'應(yīng)的 HTTP 獨(dú)立客戶端應(yīng)用程序。
    Dim httpURL As New System.Uri(url)
    httpReq = CType(WebRequest.Create(httpURL), HttpWebRequest)
    httpReq.Method = "GET"
    httpResp = CType(httpReq.GetResponse(), HttpWebResponse)
    Dim reader As StreamReader = _
    New StreamReader(httpResp.GetResponseStream, System.Text.Encoding.GetEncoding("GB2312")) '如是中文，要設(shè)置編碼格式為“GB2312”。
    Dim respHTML As String = reader.ReadToEnd()　'respHTML就是網(wǎng)頁(yè)源代碼
    Return respHTML
    httpResp.Close()
    Catch e As Exception
    Console.WriteLine("GetSource出現(xiàn)問題:{0},{1}", e.Message, url)
    End Try
    End Function

感謝各位的閱讀，以上就是“怎么用vb.net下載到完整的web頁(yè)”的內(nèi)容了，經(jīng)過本文的學(xué)習(xí)后，相信大家對(duì)怎么用vb.net下載到完整的web頁(yè)這一問題有了更深刻的體會(huì)，具體使用情況還需要大家實(shí)踐驗(yàn)證。這里是億速云，小編將為大家推送更多相關(guān)知識(shí)點(diǎn)的文章，歡迎關(guān)注！