千家信息网

怎么用vb.net下载到完整的web页

发表于:2024-09-30 作者:千家信息网编辑
千家信息网最后更新 2024年09月30日,这篇文章主要讲解了"怎么用vb.net下载到完整的web页",文中的讲解内容简单清晰,易于学习与理解,下面请大家跟着小编的思路慢慢深入,一起来研究和学习"怎么用vb.net下载到完整的web页"吧!在
千家信息网最后更新 2024年09月30日怎么用vb.net下载到完整的web页

这篇文章主要讲解了"怎么用vb.net下载到完整的web页",文中的讲解内容简单清晰,易于学习与理解,下面请大家跟着小编的思路慢慢深入,一起来研究和学习"怎么用vb.net下载到完整的web页"吧!

在网络上找了很多关于网页下载的程序但都不能完整地得到web页的内容,以下这个函数解决了这个问题。

    Private Function GetSource(ByVal url As String) As String    Try    Dim httpReq As System.Net.HttpWebRequest 'HttpWebRequest 类对 WebRequest 中定义的属性和方法提供支持',也对使用户能够直接与使用 HTTP 的服务器交互的附加属性和方法提供支持。    Dim httpResp As System.Net.HttpWebResponse ' HttpWebResponse 类用于生成发送 HTTP 请求和接收 HTTP 响'应的 HTTP 独立客户端应用程序。    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")) '如是中文,要设置编码格式为"GB2312"。    Dim respHTML As String = reader.ReadToEnd() 'respHTML就是网页源代码    Return respHTML    httpResp.Close()    Catch e As Exception    Console.WriteLine("GetSource出现问题:{0},{1}", e.Message, url)    End Try    End Function

感谢各位的阅读,以上就是"怎么用vb.net下载到完整的web页"的内容了,经过本文的学习后,相信大家对怎么用vb.net下载到完整的web页这一问题有了更深刻的体会,具体使用情况还需要大家实践验证。这里是,小编将为大家推送更多相关知识点的文章,欢迎关注!

0