以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  获取网页数据  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=127277)

--  作者:蓝蚂蚁
--  发布时间:2018/11/9 20:32:00
--  获取网页数据

看了很多本论坛关于获取网页数据的帖子,还是一头雾水,实在搞不定,请教老师我这个实例中,如何获取网页上的数据。压缩文件里面有网页的代码,烦老师帮帮忙,


[此贴子已经被作者于2018/11/9 21:20:40编辑过]

--  作者:有点蓝
--  发布时间:2018/11/9 21:04:00
--  
参考:http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=49278

例如

Dim web As New System.Windows.Forms.WebBrowser()
web.Navigate("http://www.某某网站.com/某某网页.html")
Do Until web.ReadyState = 4
    Application.DoEvents
Loop

Dim elems As object = web.Document.GetElementById("ctl00_ContentPlaceHolder1_lbCode") \'采购单号
If elems IsNot Nothing Then
    msgbox(elems.InnerText)
End If

图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看



[此贴子已经被作者于2018/11/9 21:04:33编辑过]