首页 > 代码库 > 自动化测试（二）：QTP验证点
自动化测试（二）：QTP验证点
1 程序自带验证点
自带验证点：图形界面insert -> checkpoint
Standard Checkpoint 标准验证：用于检查测试对象的属性
Text Checkpoint 文本验证：用于检查文本字符串是否在应用程序中的适当位置出现
Text Area Checkpoint文本区域验证：用于检查文本字符串是否按既定的标准出现在应用程序的预定区域
Bitmap Checkpoint 位图验证：用于检查被测试应用程序的某个区域当成位图来检查
Database Checkpoint 数据库验证
Accessibility Checkpoint 热键，快捷键验证
Example1：验证登录按钮文字为“OK”
步骤：点击Record，在Flight程序输入用户名和密码，点击insert ->checkpoint-> Text Checkpoint
Ignore spaces 忽略空格
Text not display检查文本不显示出来
Record代码：
Dialog(“Login”).Activate Dialog(“Login”).WinEdit(“Agent Name:”).Set”mercury” Dialog(“Login”).WinEdit(“Password:”).Set”mercury” Dialog(“Login”).WinButton(“OK”).Check CheckPoint(“OK”) Details: Test Checkpoint:captured”OK” Match case:OFF Exact match:OFF Ignore spaces:ON |
Example2：手工添加对象，检查错误登录是否有相应提示，通过Checkproperty（手工编写代码，无需录制）操作
步骤：点击Record，在Flight程序不输入用户名mer和密码，提示“Agent name must be at least 4 characters long.”，Object Repository->Add Objects to Local->添加文本对象 “Agent name must be at least 4 characters long.”
Record代码：
Dialog("Login").WinEdit("Agent Name: ").Set"mer" Dialog("Login").WinButton("OK").Click Dialog("Login").Dialog("Flight Reservation").Static("emmsg").CheckProperty"text"," Agent name must be at least 4 characters long. "（手工添加） Dialog("Login"). Dialog("Flight Reservation").WinButton("确定").Click |
Details：Property "text" has the expected value "Agent name must be at least 4 characters long. "
Practice1：验证Agileone登录页面用户名正确，密码错误的提示“出错啦: 密码输入错误 …”
步骤：点击Record，在internet explorer 8 输入http://localhost/agileone，用户名输入：admin，密码输入：123，点击登录按钮，点击stop
Record代码：
Browser("AgileOne - Welcome to").Page("AgileOne - Welcome to").WebEdit("WebEdit").Set "admin" Browser("AgileOne - Welcome to").Page("AgileOne - Welcome to").WebEdit("WebEdit_2").Set "2313" Browser("AgileOne - Welcome to").Page("AgileOne - Welcome to").Image("loginbt").Click Browser("AgileOne - Welcome to").Page("AgileOne - Welcome to").WebElement ("errmsg"). CheckProperty "innertext", "出错啦: 密码输入错误 ..." （手工添加） Details：Passed |
2 手工验证点
手工测试点：做自定义验证，report对象自定义报告的内容
Example3：自定义报告内容（Flight程序）
Dialog(“Login”).WinEdit(“Agent Name:”).Set”mer” Dialog(“Login”).WinButton(“OK”).Click expected_result = "Agent name must be at least 4 characters long. " actual_result = dialog("Login").Dialog("Flight Reservations").Static(errmsg).GetROProperty("text") If expected_result = actual_result Then reporter.ReportEvent micPass, "登陆验证","使用不足4位的用户名登录时，弹出的错误提示内容正确！" else reporter.ReportEvent micFile, "登陆验证","使用不足4位的用户名登录时，弹出的错误提示内容错误！" End If Dialog(“Login”). Dialog("Flight Reservation").WinButton(“确定”).Click |
Objict：登陆验证
details：当使用不足4位的用户名登录时，弹出的错误提示内容正确！
注：
① 参数有返回值就要打括号，没有返回值不打括号
② 参数与函数之间要留空格
③ 链接号用&，如需要打印actual_result时：reporter.ReportEvent micPass, "登陆验证”,”当使用不足4位的用户名登录时，弹出的错误提示内容正确！"&actual_result
Practice1：验证Agileone登录页面用户名正确，密码错误的提示“出错啦: 密码输入错误 …”，自定义报告
Record代码：
Browser("AgileOne - Welcome to").Page("AgileOne - Welcome to").WebEdit("WebEdit").Set "admin" Browser("AgileOne - Welcome to").Page("AgileOne - Welcome to").WebEdit("WebEdit_2").Set "2313" Browser("AgileOne - Welcome to").Page("AgileOne - Welcome to").Image("loginbt").Click expected_result = "出错啦: 密码输入错误 ..." actual_result = Browser("AgileOne - Welcome to").Page("AgileOne - Welcome to").WebElement("errmsg"). GetROProperty("innertext") If expected_result = actual_result Then reporter.ReportEvent micPass, "登陆验证","当密码出错登录时弹出的错误提示内容正确！" else reporter.ReportEvent micFile, "登陆验证","当密码出错登录时弹出的错误提示内容错误！" End If |
Object：登陆验证
Details：当密码出错登录时弹出的错误提示内容正确！
Result：passed
自动化测试（二）：QTP验证点