cafard-haibin 发表于 2008-9-5 11:05:26

让qtp自动依次选择记录

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

zrg9399 发表于 2008-9-5 11:26:05

先取出WebCheckBox("check").的id，利用循环依次递增

cafard-haibin 发表于 2008-9-5 12:49:38

能具体说明下不？朢指点。

cafard-haibin 发表于 2008-9-5 15:46:36

先给自己一个思路。可惜我的对象库中没有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:14

能把这个web页面的截图发出来吗？我好分析具体元素

cafard-haibin 发表于 2008-9-5 16:10:19

这是页面图。敏感数据我擦掉了。不好意思。
页: [1]
查看完整版本: 让qtp自动依次选择记录