QTP软件测试计划书,软件测试工作中使用QTP的总结

1、QTP自带函数print

调试代码的时候一般习惯用De

Eg:

Dim p

p=Browser("xx").page.("xx").webedit("object_name").GetROProperty("value")

print p

2、calender控件

一般日期格式字段是同时支持手填日期格式的text field和用鼠标点日历控件选择。但是在DMPOD系统里发现部分日期格式的字段居然disable了用户手动输入的属性，只能靠点日历控件来选择日期。结果录到的脚本全变成了img.click，无法回放。查了很久突然某一天找到了办法，绕过这个控件，强制转换它的属性值。

Eg:

Dim var_object

Set var_object=Browser("xx").page("xx").webedit("calendar_name").Object

Var_object.readonly=false

Browser("xx").page("xx").webedit("calendar_name").set "4/24/2009"

3、homepage menu

曾经困扰了我很久。Homepage dropdown menu 需要鼠标移动到主菜单名上才会显示子菜单目录，click子菜单目录进入页面。QTP总是无法捕捉到鼠标移动带出子菜单目录这个操作，解决办是用mouseover。

Eg:

Browser("xx").page("xx").webelment("homepage menu name").FireEvent "onMouseOver"

Browser("xx").page("xx").webelment("sub menu name").Click

4、自定义checkpoint

在页面提交保存后，自定义设置一个检查点，通过判断某个变量值是否满足预期，如果是，则保存成功，如果不是则保存失败。

Eg:

If Browser("xx").page.("xx").webedit("object_name").GetROProperty("value")="AA" Then

Reporter.ReportEvent micPass,"AA checkpoint","page is saved successfully"

Else Reporter.ReportEvent micFail,"AA checkpoint","page is not saved successfully"

End If

5、编程性描述语言识别对象

刚开始一段时间，一直不知道QTP除了用对象库识别对象外，还可以用编程性描述语言。后来查了网上的资料才明白过来。

第一种方法：

Browser("CreationTime:=0").Page("index:=1").WebEdit("name:=" & edit).Set "ha"

我没有尝试过，总感觉不如对象库来的方便，在对象库中可以直接选择和修改用来识别对象的属性，以及highlight object等功能。

第二种方法：

碰到过一个Case是，页面上table A里的checkbox元素数量每次运行时都是不相同的，随着页面上另一个对象B的值而改变，对象B的值又是参数化的，最后造成checkbox数量运行前无法预知。操作时又需要每次都选上所有的checkbox。最后用这种识别对象方法可以顺利实现。

Public function SelectAllCheckBox()

Set NewObject = Description.Create '创建满足下面三个条件的对象集

NewObject("micclass").value ="WebCheckBox"

NewObject("html tag").value="INPUT"

NewObject("class").value = "checkBox_class"

Set NewObjects = Browser("xx").Page("xx").ChildObjects(NewObject) '实际运行时的对象

Numbers = NewObjects.Count 'checkbox的个数

For i = 0 to NewObjects.count –1 '循环

NewObjects(i).Set "ON" '每一个checkbox都set on

Next

End Function

论坛精华帖

21/212>