ChildItem使用的疑问。

wuzhuayu

自己写了一段代码，目的是在指定的Cell中点击一个链接。
Set oDesc = Description.Create()
  oDesc("micclass").value = "WebTable"
Set TableList  = Browser("xxxx").Page("xxxxx").Frame("foldlist_setting").ChildObjects(oDesc)
TableCount = TableList.count()
For i = 0 To TableCount
If Instr(TableList(i).GetCellData(2,1),"收件箱") Then
  set l = TableList(i).ChildItem(2,1,"Link",0)   ---------------------------这一步有问题。
  l.click
End If
Next

set l = TableList(i).ChildItem(2,1,"Link",0)  这一步在获取链接的时候有问题。
但是我使用TableList(i).ChildItemCount(2,1,"Link") 结果是1，说明能够找到1个内容为“收件箱”的Link的，但是ChildItem获取出来的对象却不行。
想不明白啊，请大家帮忙看看。

dog487

关注

shaofei19820625

报什么错误?

marygao929

1.If Instr(TableList(i).GetCellData(2,1),"收件箱") Then
  这句改成： If Instr(TableList(i).GetCellData(2,1),"收件箱")<>0 Then

2.For i = 0 To TableCount
  这句改成：For i = 0 To TableCount-1

wuzhuayu

marygao说的两个问题，只是小细节，不会影响到结果的，呵呵。
set l = TableList(i).ChildItem(2,1,"Link",0)   在调试中发现，执行到这一句，不会报错，报错的是下一句 l.click，提示，对象不支持此属性或方法。

因此我觉得，TableList(i).ChildItem(2,1,"Link",0)   这里使用ChildItem根本没有取到link对象。

sarying

cell里面还有其它element没，尝试下能不能输出你得到的这个element的某个属性看看！

marygao929

1.  set l = TableList(i).ChildItem(2,1,"Link",0)
    l.click
    改为
    dim objlk
    set objlk=TableList(i).ChildItem(2,1,"Link",0)
    objlk.click

2. 检查link是否在webtable的第2行第1列。估计行号是2，列号不对。

hzieezyf

刚才也碰到这样的问题,结果发现是因为不是link,而是WebElement的原因

改成
set objlk=TableList(i).ChildItem(2,1,"WebElement",0)
就ok了