VB.NET抓取网页出现错误如何解决

本篇内容主要讲解“VB.NET抓取网页出现错误如何解决”,感兴趣的朋友不妨来看看。本文介绍的方法操作简单快捷,实用性强。下面就让小编来带大家学习“VB.NET抓取网页出现错误如何解决”吧!

VB.NET编程语言特点比较突出,它是一个真正的实现面向对象以及支持继承性的编程语言,其应用范围广泛,功能强大,帮助开发人员大大提高了编程效率。在调试VB.NET调用Microsoft.XMLHttp组件抓取网页时,遇到了抓取中文字符出现乱码,经测试若网元标页签字符集为utf - 8的网页不会乱码,而字符集为Gb2312的则会出现乱码,本文提供了一个完整的解决方法,希望对研究VB.NET抓取网页或者VB.NET实现采集功能的朋友有所帮助。

以下为VB。净抓取网页的函数LobDotCn注:url_Link为抓取的目标页面IsGb2312为是否Gb2312字符

  <李> 
 Public  Function  LobDotCn (ByVal  url_Link  
 As 字符串,ByVal  IsGb2312  As 布尔),李,
  <李> 
提醒Error  Resume  Next 李,
  <李> 
 Dim  XmlHttp  As  Object 李,
  <李> 
 XmlHttp =, CreateObject (“Microsoft.XMLHttp"),李,
  <李> 
 XmlHttp.Open (“POST",, url_Link,,假),李,
  <李> 
 XmlHttp.Send (),李,
  <李> 
 Dim  WebContent  As  Object 李,
  <李> 
 Dim  Str_WebContent  As  String 李,
  <李> 
 If  IsGb2312  Then 李,
  <李> 
 WebContent =, XmlHttp.ResponseBody 李,
  <李> 
 Str_WebContent =, System.Text.Encoding。
 Default.GetString (WebContent),李,
  <李> 
 Else 李,
  <李> 
 WebContent =, XmlHttp.ResponseText 李,
  <李> 
 Str_WebContent =, WebContent.ToString 李,
  <李> 
最终获得If 李,
  <李> 
 XmlHttp =, Nothing 李,
  <李> 
 LobDotCn =, Str_WebContent 李,
  <李> 
最终获得Function , 
   

VB。净抓取网页的调用方式:

变量=LobDotCn (“http://www.lob.cn",真)& # 39;抓取Gb2312网页

变量=LobDotCn(“此处填写网址“,False) & # 39;抓取utf - 8网页

到此,相信大家对“VB.NET抓取网页出现错误如何解决”有了更深的了解,不妨来实际操作一番吧!这里是网站,更多相关内容可以进入相关频道进行查询,关注我们,继续学习!

VB.NET抓取网页出现错误如何解决