现在如何用新的移动端功能，Get方式请求外网网页并读取抓取网页的数据？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

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

共有2626人关注过本帖树形打印复制链接主题：现在如何用新的移动端功能，Get方式请求外网网页并读取抓取网页的数据？

chen3728060

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：二尾狐帖子：388 积分：5098 威望：0 精华：0 注册：2013/11/2 0:01:00

现在如何用新的移动端功能，Get方式请求外网网页并读取抓取网页的数据？ 发帖心情

Post By：2017/4/11 15:05:00 [只看该作者]

我想问下，现在如何用新的移动端功能，Get方式请求外网网页并读取抓取网页的数据？

http://search.anccnet.com/searchResult2.aspx?keyword=6907992100272

我想做一个很简单的条码查询商品功能。我发现中国信息条码平台里，商品是这样查询条码的，通过Get。

我想在客户端，查询了条码以后，然后message.show出商品名称，请问怎样可以快速实现？我相信很多做小零售软件的朋友，都想可以有商品库，快速录入，扫描条码直接得到名称和规格之类的东西，提高录入效率

[此贴子已经被作者于2017/4/11 15:05:38编辑过]

狐狸爸爸

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：管理员帖子：47511 积分：251479 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2017/4/11 15:14:00 [只看该作者]

参考:

http://www.foxtable.com/mobilehelp/scr/0157.htm

例如：

Dim hc As New HttpClient("http://search.anccnet.com/searchResult2.aspx?keyword=6907992100272")
Dim dt As string = hc.GetData()
MessageBox.Show(dt)

[此贴子已经被作者于2017/4/11 15:15:08编辑过]

有点色

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | 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

下一主题 >> << 上一主题

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