以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  if 判断  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=49214)

--  作者:qianqian1530
--  发布时间:2014/4/14 13:40:00
--  if 判断
Dim e_Info As System.Windows.Forms.HtmlElement = elem.GetElementsByTagName("tbody")(0)

If e_Info.GetElementsByTagName("tr")(16).InnerText Is Nothing Then
Exit For

end if



我的问题是 , 当tr  16  不存在的时候 停止循环,  

 但是每次 执行的时候 都会显示  
“16”的值对于“index”无效。“index”应介于 0 和 15 之间。
参数名: index


 有办法 解决么

--  作者:有点甜
--  发布时间:2014/4/14 13:54:00
--  

 直接判断个数不行?

 

msgbox(e_Info.GetElementsByTagName("tr").Count)


--  作者:qianqian1530
--  发布时间:2014/4/14 13:57:00
--  
不行, 我直接上传文件吧..
点一下 更新
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:快递api.zip




http://tracking.post.japanpost.jp/service/singleSearch.do?searchKind=S004&locale=ja&reqCodeNo1=EG290947135JP

网页地址
[此贴子已经被作者于2014-4-14 13:59:41编辑过]

--  作者:Bin
--  发布时间:2014/4/14 14:19:00
--  
判断一下 e_Info.GetElementsByTagName("tr").Count 是否大于等于17即可

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:快递api.rar



--  作者:qianqian1530
--  发布时间:2014/4/14 14:22:00
--  回复:(Bin)判断一下 e_Info.GetElementsByTag...
...问题是,其他的 快递单号,不一定会是 16个, 也许更多···也许会更少..
--  作者:Bin
--  发布时间:2014/4/14 14:24:00
--  
你自己取得第17行 也就是下标16 
--  作者:Bin
--  发布时间:2014/4/14 14:24:00
--  
如果是想取最后一行,应该取
e_Info.GetElementsByTagName("tr").Count-1

--  作者:qianqian1530
--  发布时间:2014/4/14 14:48:00
--  回复:(Bin)如果是想取最后一行,应该取e_Info.GetEl...
图片点击可在新窗口打开查看  成功咯~