Foxtable(狐表)用户栏目专家坐堂 → [求助]获取网页表格


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

主题:[求助]获取网页表格

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


加好友 发短信
等级:六尾狐 帖子:1483 积分:10551 威望:0 精华:0 注册:2018/10/16 11:42:00
[求助]获取网页表格  发帖心情 Post By:2019/9/4 9:29:00 [只看该作者]

支付宝交易详情页面,我需要怎样才能让他导入狐表?

Dim web As System.Windows.Forms.WebBrowser = forms("窗口1").controls("webbrowser1").Basecontrol
Dim elems As object = web.Document.GetElementsByTagName("table")
msgbox(elems(0).Innertext)
ClipBoard.SetText(elems(0).Innertext)
Dim trs = elems(0).GetElementsByTagName("tr")
For i As Integer = 1 To trs.count-1
    Dim tr = trs(i)
    Dim tds = tr.GetElementsByTagName("td")
    msgbox(tds(0).Innertext)
Next


我要获取这一节内容。红色区域一直是空值。是我写错了吗
以下内容是专门发给有点蓝浏览

 下载信息  [文件大小:   下载次数: ]
点击浏览该文件:支付宝.zip





 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110528 积分:562524 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/4 9:37:00 [只看该作者]

网页抓数据这种问题请自行解决,看看:http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=49278

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


加好友 发短信
等级:六尾狐 帖子:1483 积分:10551 威望:0 精华:0 注册:2018/10/16 11:42:00
  发帖心情 Post By:2019/9/4 11:18:00 [只看该作者]

Dim web As System.Windows.Forms.WebBrowser = forms("窗口1").controls("webbrowser1").Basecontrol
Dim elems As object = web.Document.GetElementsByTagName("table")
msgbox(elems(0).Innertext)
ClipBoard.SetText(elems(0).Innertext)
Dim trs = elems(0).GetElementsByTagName("tr")
For i As Integer = 1 To trs.count-1
    Dim tr = trs(i)
    msgbox(tr .Innertext)
    Dim tds = tr.GetElementsByTagName("td")
    'msgbox(tds(0).Innertext)
    msgbox(tds(2).Innertext)
    msgbox(tds(3).Innertext)
    msgbox(tds(4).Innertext)

Next
就红色区域有问题,只有第一个是空值,没有第二个第三个。可是我看一个tr下面有六个td代码

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110528 积分:562524 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/4 11:25:00 [只看该作者]

For i As Integer = 1 To trs.count-1
    Dim tr = trs(i)
    msgbox(tr .Innerhtml) ‘显示什么?

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


加好友 发短信
等级:六尾狐 帖子:1483 积分:10551 威望:0 精华:0 注册:2018/10/16 11:42:00
  发帖心情 Post By:2019/9/4 11:33:00 [只看该作者]

显示成这样
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20190904113159.png
图片点击可在新窗口打开查看


 回到顶部
帅哥,在线噢!
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110528 积分:562524 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/4 11:54:00 [只看该作者]

msgbox(tr .Innerhtml) ‘显示什么?

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


加好友 发短信
等级:六尾狐 帖子:1483 积分:10551 威望:0 精华:0 注册:2018/10/16 11:42:00
  发帖心情 Post By:2019/9/4 12:08:00 [只看该作者]



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


加好友 发短信
等级:六尾狐 帖子:1483 积分:10551 威望:0 精华:0 注册:2018/10/16 11:42:00
  发帖心情 Post By:2019/9/4 12:08:00 [只看该作者]

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

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


加好友 发短信
等级:六尾狐 帖子:1483 积分:10551 威望:0 精华:0 注册:2018/10/16 11:42:00
  发帖心情 Post By:2019/9/4 12:09:00 [只看该作者]


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

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


加好友 发短信
等级:六尾狐 帖子:1483 积分:10551 威望:0 精华:0 注册:2018/10/16 11:42:00
  发帖心情 Post By:2019/9/4 12:10:00 [只看该作者]

<td class="time">
   
   
          <p>今天</p>
        <p class="text-muted">   08:15
 </p>
   
  </td> 


下一个

<td class="name">
       <p class="consume-title" style="visibility: visible;">
                                  <a href="https://consumeprod.alipay.com:443/record/detail/simpleDetail.htm?bizType=TRADE&amp;bizInNo=2019090422001453710519136815&amp;gmtBizCreate=20190904081540" target="_blank" seed="consumeTitle-link" smartracker="on">商品</a>
                    </p>
     
             
                      <p class="name p-inline ft-gray" style="visibility: visible;">
        空心竹 |
                </p>
               
                
                                  <div class="consume-bizNo ft-gray fn-pr J-tradeNo-container  p-inline" id="J-tradeNo-container-1">
       流水号
       
                       <a class="J-tradeNo-copy J-tradeNo" id="J-tradeNo-1" href="javascript:;" data-clipboard-text="2019090422001453710519136815" title="2019090422001453710519136815" seed="JTradeNoContainer1-JTradeNo1" smartracker="on">   2019...815
 </a>
      </div>
    
            
    </td>
[此贴子已经被作者于2019/9/4 12:10:30编辑过]

 回到顶部
总数 12 1 2 下一页