level 2
yy小杨
楼主
求大神帮帮忙,搞了好久了,没搞定,拜谢!
需求: 获取如下表格中的每个值

'========================================================================
Dim otable
Set otable =Browser(bwsPlatformObj).Page(pagePlatformObj).WebTable(webTableObj)
oRow = otable.RowCount '行
print "oRow = " & oRow
oCol = otable.ColumnCount(2) '列
print "oCol = " & oCol
Dim temp
For i = 1 to oRow
temp = ""
For j = 1 to oCol
temp = temp &otable.GetCellData(i,j) & " | "
Next
print temp
Next
Setotable = Nothing
'=========================================================================
以上代码报如下错误:

已有的控件属性值:













2016年12月28日 02点12分
1
需求: 获取如下表格中的每个值

'========================================================================Dim otable
Set otable =Browser(bwsPlatformObj).Page(pagePlatformObj).WebTable(webTableObj)
oRow = otable.RowCount '行
print "oRow = " & oRow
oCol = otable.ColumnCount(2) '列
print "oCol = " & oCol
Dim temp
For i = 1 to oRow
temp = ""
For j = 1 to oCol
temp = temp &otable.GetCellData(i,j) & " | "
Next
print temp
Next
Setotable = Nothing
'=========================================================================
以上代码报如下错误:

已有的控件属性值:











