51Testing软件测试论坛

标题: 让qtp自动依次选择记录 [打印本页]

作者: cafard-haibin 时间: 2008-9-5 11:05
标题: 让qtp自动依次选择记录
1：功能描述：
有个web页面有多条记录，每次选择一条做提交操作。且已提交的不能再提交；
2：录制的脚本如下：
Browser("hello").Page("pagename").WebCheckBox("check").Set "ON"
3：问题是：如果让qtp来自动做其他记录?

作者: zrg9399 时间: 2008-9-5 11:26
先取出WebCheckBox("check").的id，利用循环依次递增

作者: cafard-haibin 时间: 2008-9-5 12:49
能具体说明下不？朢指点。

作者: cafard-haibin 时间: 2008-9-5 15:46
先给自己一个思路。可惜我的对象库中没有WebTable 这个对象。
Function clickcheckbox(num)' pass the number where you want the
chekbox to be selected.

Dim row

row =Browser("--Test Page--").Page("--Test Page--").WebTable("Test#").GetROProperty("rows")

For i=2 to row 'I am starting the rom from 2 because the first row contrauion the label

      If cstr(Browser("--Test Page--").Page("--Test Page--").WebTable("Test#").GetCellData(i,1)) =cstr(num) Then

            Set WebChkObj=Browser("--Test Page--").Page("--Test Page--").WebTable("Test#").ChildItem(i,2,"WebCheckBox",0)

webChkObj.Set "ON"
      End If

Next
End Function

clickcheckbox 3

作者: ellven 时间: 2008-9-5 15:48
能把这个web页面的截图发出来吗？我好分析具体元素

作者: cafard-haibin 时间: 2008-9-5 16:10
这是页面图。敏感数据我擦掉了。不好意思。

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)