Foxtable(狐表)用户栏目专家坐堂 → [求助]关于网页表格数据保存到狐表


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

主题:[求助]关于网页表格数据保存到狐表

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/6/4 15:34:00 [显示全部帖子]

Dim web As New System.Windows.Forms.WebBrowser()
web.Navigate("http://cx.jljsw.com:8088/JLJGPublish/corpinfo/CorpInfo.aspx/")
Do Until web.ReadyState = 4
    Application.DoEvents
Loop

 回到顶部
帅哥哟,离线,有人找我吗?
Hyphen
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/6/4 17:00:00 [显示全部帖子]

Dim elems As object = web.Document.GetElementById("list_elem").GetElementsByTagName("tr")

网页里没有list_elem这个ID

dim obj = web.Document.GetElementById("list_elem")
if obj is nothing then return

Dim elems As object = obj.GetElementsByTagName("tr")

 回到顶部