QTP自动化测试—用户登录

always_fly

一、测试步骤：
1、设计自动化测试用例：（测试用例只设计部分的）
1）用户名、密码为空，点击【登录】按钮，期望系统提示“请输入用户名。”，测试数据：无；
2）输入用户名，密码为空，点击【登录】按钮，期望系统提示“密码一栏为空。”，测试数据：
test，空；
3）输入错误的用户名、密码，点击【登录】按钮，期望系统提示“无效用户名。”，测试数据test
，test；
4）输入正确的用户名、错误的密码，点击【登录】按钮，期望系统提示“test 的密码不正确。”，
测试数据test，123456；
5）输入正确的用户名、密码，点击【登录】按钮，通过系统验证，正常登录系统，测试数据：
test，111111.

2、录制脚本，通过正常的业务流程，登录系统，然后再退出系统；
3、回放脚本
4、保存脚本；
5、增强脚本，对用户名、密码进行参数化；
6、在datatable中创建一个预期值列表status；
7、按照设计的测试用例，填写用户名username、密码password以及期望值status的参数值；
8、创建相应变量，创建一个表示datatable中行号i；
9、用for循环，能够自动读取每一行用户名和密码；
10、插入一个文本输出点，输出系统的实际提示信息，并将该输出值保存datatable中的action1
的outmsg列；
11、定义一个读取系统实际提示信息的变量outputvalue；
12、将系统实际提示信息赋予定义的变量outputvalue；
13、定义、并将预期提示信息的值赋给变量istatus；
14、预期结果与实际结果进行比较；
15、设置自动获取action1中下一行值继续执行测试；
16、调试、优化脚本，并执行测试，结果分析。

二、测试脚本：
Dim i  ’定义行号
Dim outputvalue  ’定义系统获取实际的提示信息变量
Dim istatus  ’定义系统获取预期的提示信息变量

For i=1 to datatable.GetSheet(“Action1″).GetRowCount

Browser(“测试屋|软件测试工程师的网上书店”).Page(“测试屋|软件测试工程师的网上书店”).Link
(“登录”).Click
Browser(“测试屋|软件测试工程师的网上书店”).Page(“测试屋|软件测试工程师的网上书店 › 登录
”).WebEdit(“log”).Set DataTable(“username”, dtLocalSheet)
Browser(“测试屋|软件测试工程师的网上书店”).Page(“测试屋|软件测试工程师的网上书店 › 登录
”).WebEdit(“pwd”).SetSecure DataTable(“password”, dtLocalSheet)
Browser(“测试屋|软件测试工程师的网上书店”).Page(“测试屋|软件测试工程师的网上书店 › 登录
”).WebButton(“登录”).Click
Browser(“测试屋|软件测试工程师的网上书店”).Page(“测试屋|软件测试工程师的网上书店 › 登录
”).Output CheckPoint(“测试屋|软件测试工程师的网上书店 › 登录”)

outputvalue=datatable(“outmsg”,dtlocalsheet)  ’将实际输出值赋予变量outputvalue
istatus=datatable(“ststus”,dtlocalsheet)      ’将预期输出值赋予变量istatus

If  outputvalue<>istatus Then
reporter.ReportEvent 1,”登录测试”,”预期值为：”+istatus+”, 实际值为：”+outputvalue   ‘预期
结果与实际结果进行对比
End If
datatable.GetSheet(“Action1″).SetNextRow  ’获取Action1中的下一行数据
Next
Browser(“测试屋|软件测试工程师的网上书店”).Page(“仪表盘 ‹ 测试屋|软件测试工程师的网上
书店”).Link(“登出”).Click
Browser(“测试屋|软件测试工程师的网上书店”).Page(“测试屋|软件测试工程师的网上书店 › 登
录_2″).Sync
Browser(“测试屋|软件测试工程师的网上书店”).Close

三、datatable数据：

lijiong082

海海豚

谢谢分享~

梦想家