QTP编写测试脚本

1.锁定键盘和鼠标

systemUtil.blockinput 

systemUtil.unblockinput

2、向结果报告中输出信息

reporter.ReportEvent micFail,"插入操作","失败了的具体信息"

3、下拉列表和列表框的使用

1）存储列表对象

　　　　set 对象名=列表对象名。

2） 存储列表中的内容为一个字符串

　　　　对象名.getContent

3） 获取列表包含的项数

　　　　对象名.getItemsCount

4 ）获取选中项

　　　　 对象名.getSelection

5）获取列表中的项目

 

 

 6）选取某个值

 

 

 

 4、判断对象是否存在

对象名.exist(超时时间) 

• 在规定时间内判断对象是否存在。 
• 无返回值时不用括号。

5、使用环境变量

1）查看内置环境变量

 2）自定义环境变量赋值

environment("变量名")=值 

【例 1】将代理名称存入环境变量。

    environment("AgentName")="haidian"

6、使用脚本添加检查点

 

 

 

 例：检查机票数是否大于0

Window("航班预订").WinEdit("机票数:").CheckProperty "text",micGreaterThan(0),2

 

 7、使用正则表达式

1）使用规则

 

 在多行文本中查找指定子串的行

查找以“zh”开头的

xm="zhsan" &vbcrlf & "lisi" &vbcrlf & "Zhw" &vbcrlf & "liuba" &vbcrlf & "zHqi" &vbcrlf &"songsi" &vbcrlf & "zhao6"

Set guize=new regexp

rem匹配规则

 

guize.pattern="zh.*"

rem 忽略大小写

guize.ignorecase=true

 

rem 全局查找

guize.global=true

 

Set jg=guize.execute(xm)

For each x in jg print x Next

2）使用正则表达式选择列表项

如果有08:开头，选择；如果没有默认第一个

 

 

 

 3） 检查点中使用正则表达式

 

 8、使用脚本处理数据表

1）操作 sheet 表 

• 增加 sheet 表              DataTable.AddSheet "表名" 
• 获得/打开 Sheet 表  （DataTable.GetSheet "表名"或表编号） 

    编号从 1 开始 

    表名区分大小写。

• 删除 Sheet 表  DataTable.DeleteSheet "表名"或表编号  编号从 1 开始

 2）操作 sheet 表中的行和列

 

 

 

 

 

 删除之后，查看结果

 

 

 

 

3） 统计 sheet 表中相关个数

 

 

 

 

4） 导入导出 sheet 表

 

 导出

 

 导入