功能自动化测试之QTP编写测试脚本（二）

说明：该篇博客是博主一字一码编写的，实属不易，请尊重原创，谢谢大家！
接着上一篇博客继续往下写 ：https://blog.csdn.net/qq_41782425/article/details/103766798

二、使用 VBScript 处理脚本

6.使用环境变量

6.1 查看内置环境变量

• 注意
  √     内置环境变量区分大小写。

• environment(“LocalHostName”)
  √     客户机主机名

• environment(“OS”)
  √     操作系统名称

• environment(“OSVersion”)
  √     操作系统版本

• environment(“UserName”)
  √     计算机登录用户名

• environment(“ProductDir”)
  √     QTP 的安装路径

• environment(“ActionName”)
  √     操作/动作的名称

• Environment(“TestIteration”)
  √     迭代次数，用于 Global 表

• Environment(“ActionIteration”)
  √     迭代次数，用于 Global 以外的普通数据表

• 在QTP设置中查看内置的环境变量
  

• 打印出主机名、系统、系统版本、用户名
  

• 设置脚本数据表从1行运行到3行，打印出迭代次数
  

• 运行脚本打印出来的迭代次数与实际一致
  

• 此时将数据表迭代设置从4运行到6，查看打印结果还正确，TestIteration用于global表中的运行的行数
  

【例 1】使用环境变量控制打开软件一次。

• 通过以上TestIteration例子，那么可以完成当数据表迭代次数为1时才打开软件其他则不重复打开软件，也就是说在数据表global中除了运行到第一行时需要打开软件其他则进行登录操作即可
  

6.2 自定义环境变量赋值

environment(“变量名”)=值
【例 1】将代理名称存入环境变量。

7.使用脚本添加检查点

• 对象名.checkProperty 属性名，属性值，超时时间
  √     在规定时间内检查对象属性是否符合指定值要求。
  √     加密数据的 text 属性无法获得。
  √     属性值一般使用
         ●     micGreaterThan(值)
         ●     micLessThan(值)
         ●     micGreaterThanOrEqual(值)
         ●     micLessThanOrEqual(值)
         ●     micNotEqual(值)
         ●     micRegExpMatch(值)

【例 1】检查输入错误账号后是否提示正确的错误信息。
Set cuo=dialog(“登录”).Dialog(“航班预订”).Static(“文本位置原始的显示文字”) cuo.CheckProperty “text”, “密码为 ““MERCURY”””,3

• Static 标签文字必须入库；
• 只能进行精确匹配。
• 在脚本中使用命令添加检查点之前，需要将该检查点添加到对象库中，然后通过在脚本合适的位置进行添加
  
• 运行代码，检查结果预期一致
  
  【例 2】检查机票数是否大于 0
  
• 运行脚本，查看结果显示检查通过
  

8.在脚本中使用正则表达式

8.1 正则表达式对象

• set 对象名=new regexp
  √     创建正则表达式对象

• 对象名.pattern
  √     要查找的符合正则表达式要求的字符串

• 对象名.ignoreCase
  √     忽略英文字母大小写
  √     默认区分大小写

• 对象名.global
  √     true 表示找所有项
  √     默认 false 表示找第一项

• 对象名.test(字符串)
  √     返回能否找到匹配字符串的布尔值

• set 对象=对象名.execute(字符串)
  √     在字符串中进行查找，结果存入对象中

【例 1】</