Foxtable(狐表)用户栏目专家坐堂 → 现在如何用新的移动端功能,Get方式请求外网网页并读取抓取网页的数据?


  共有2281人关注过本帖树形打印复制链接

主题:现在如何用新的移动端功能,Get方式请求外网网页并读取抓取网页的数据?

帅哥哟,离线,有人找我吗?
有点色
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/4/11 16:21:00 [显示全部帖子]

参考代码

 

Dim hc As New HttpClient("http://search.anccnet.com/searchResult2.aspx?keyword=6907992100272")
hc.ResponseEncoding = "gb2312"
Dim str As String = hc.GetData()
output.show(str)
Dim mc1 = System.Text.RegularExpressions.Regex.Matches(str,"(?<=<dd>).+(?=</dd>)")
If mc1.count > 0 Then
    msgbox(mc1(0).value)
    msgbox(mc1(2).value)
End If


 回到顶部