【QTP】WebTable里存储数据的一种方法

【QTP】WebTable里存储数据的一种方法

最近看到坛子里有人在问WebTable控件获取数据后,存储和使用的便捷方式。
  这里我就献丑写一下我在这块上的处理方式,我自己做了个简单的页面,来演示一些使用:
【QTP】WebTable里存储数据的一种方法_第1张图片
  比如上面这个页面,取数据不难,主要是直观,所以我用的方法是用数组与字典结合的方式:
Dim oTable
Set oTable = Browser("无标题文档").Page("无标题文档").WebTable("表格")
Dim oRow, oCol
oRow = oTable.RowCount
oCol = oTable.ColumnCount(1)
Dim arrData()
ReDim arrData(oRow)
Dim i , j
For i = 1 to oRow-1
Set arrData(i)=CreateObject("Scripting.Dictionary")
For j = 1 to oCol
arrData(i).Add Trim(oTable.GetCellData(1,j)) , oTable.GetCellData(i+1,j)
Next
Next
print  arrData(3)("姓名")
print  arrData(9)("数据3")
  下面的是使用和打印的效果。
【QTP】WebTable里存储数据的一种方法_第2张图片
  OK,算是抛砖引玉吧。

你可能感兴趣的:(【QTP】WebTable里存储数据的一种方法)