|
原帖由 zbsczh 于 2009-6-9 17:48 发表
这个也是我疑惑的。。。为什么截图上显示image时webtable的下一级,但是放到库里的时候却是page下面直接是image,没有webtable这一级了。。。
所以在webtable上操作image好像是不可行的,倒是可以查出在webtable上 ...
你调试一下看看:
Function GetImageObj(labelvalue)
Set ObjWT = Browser("creationtime:=0").page("index:=0").WebTable(attribute:=value)'首先获取image最近的顶层webtable 你也可以把webtable直接加入对象库
For i= 1 to ObjWT.RowCount
For j= 1 to ObjWT.ColumnCount(i)
index = 0
While index < ObjWT.ChildItemCount(i,j,"WebElement")
Set ObjL = ObjWT.ChildItem(i, j, "WebElement", 0)
If ObjL.GetROProperty("innerhtml") = labelvalue Then'根据label定位行列
Set GetImageObj = ObjWT.ChildItem(i, j, "Image", 0)'在此处获取image对象
Exit Function
End If
Wend
Next
Next
End Function
Set ObjImage = GetImageObj("Report type: Collateral Assets")
ObjImage.Click
Set ObjImage = nothing
[ 本帖最后由 RayTM 于 2009-6-10 14:01 编辑 ] |
|