我叫陈永达,欢迎来到我的51testing空间! 才开始使用,想把关于软件测试的一些资料和心得保存于此。 欢迎大家多来参观,多提宝贵意见!

【QTP】取出WebTable中的数据

上一篇 / 下一篇  2012-12-04 11:40:45 / 个人分类:QTP

先上一段脚本:

'取出WebTable中所有数据
Dim otable
Set otable = Browser("XXXX").Page("XXXX").WebTable("XXXX")

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
Set otable = Nothing

这段脚本只是打印出WebTable中所有的内容。

然后介绍WebTable中最常用的2个方法

l  GetCellData

GetCellData的作用是获取指定单元格(指定行,指定列)的值

用法:object.GetCellData(Row,Column)

如:otable.GetCellData(2, 3)           '取出WebTable中,第2行,第3列的值

l  ChildItem

ChildItem顾名思义就是子对象啦,比如需要勾选WebTable中的一个勾选框(WebCheckBox)

用法:object.ChildItem(Row,Column,MicClass,Index)

MicClass:对象控件的类名,如ListWebButton等。

Index:一般就填写0就好了。

如:

Set oWebCheckBox= otable.ChildItem(3,1,"WebCheckBox",0)

oWebCheckBox.Set "on"            '勾选

Set oWebCheckBox= Nothing


PS:可能由于编码问题,有时候上传的代码会被莫名其妙的挖去些字符,很无奈啊。

其他地址:http://blog.csdn.net/cydblack/article/details/8255085


TAG: 软件测试 QTP WebTable Webtable 陈永达

T_ifk的个人空间 引用 删除 T_ifk   /   2013-01-10 11:53:07
5
yinlu test 引用 删除 yinlutest   /   2013-01-09 09:36:59
5
陈永达的软件测试 引用 删除 黑羽祭   /   2012-12-06 09:05:23
现在改好了
陈永达的软件测试 引用 删除 黑羽祭   /   2012-12-05 23:57:05
原帖由wangyinhang于2012-12-05 09:32:52发表
第一行的otable和和第二行table是同一个东西吗?如果不是的话,第三行的那个otable的行数从哪儿得来的啊.

感谢细心的网友,唉,我也无奈,这是第n次出现这样的情况了,其实都是otable,由于脚本是复制,原本都对的,但发表后由于网页字符原因,部分字母丢失了,造成错误。
我的地盘大家做主 引用 删除 wangyinhang   /   2012-12-05 09:56:20
5
我的地盘大家做主 引用 删除 wangyinhang   /   2012-12-05 09:32:52
第一行的otable和和第二行table是同一个东西吗?如果不是的话,第三行的那个otable的行数从哪儿得来的啊,新手,麻烦楼主给解释一下
 

评分:0

我来说两句

Open Toolbar