标签：通过 了解 控件实现 成功 step font system justify 不同
一、实验目的
1） 学习QTP工具的使用
2）了解黑盒自动化测试
二、实验要求
（1）对被测程序进行黑盒测试用例设计
（2）对QTP的飞机订票系统的任一界面或控件实现自动化测试。（测试的具体自选）
（3）写出该程序的缺陷。
三、实验内容
1、对QTP的样例小程序飞机订票系统，实现自动化测试。（学号被3整除，测3a;余1，测3b；余2，测4a）
2、要求：
1）写出飞机订票系统的被测需求。
自行选择需要测试的部分，根据自己的能力，可大，可小。
描述，被测程序，与被测部分的功能。
2）设计测试用例。写出测试用例表。
3）编写测试脚本，实现自动化测试。
4）写测试小结。该程序的缺陷，和测试结果。
3、最后写实验总结。
4、实验步骤
测试需求：飞机订票系统登录测试
需求描述：根据用户输入，测试不同的用户名密码是否可以成功登录。
1.设计测试用例
|
编号 |
username&password |
预期结果 |
实际结果 |
是否符合 |
|
1 |
Aaaa&mercury |
登录成功 |
登录成功 |
√ |
|
2 |
aaaa&mer |
提示密码错误 |
提示密码错误 |
√ |
|
3 |
aaa&mercury |
提示用户名错误 |
提示用户名错误 |
√ |
|
4 |
aaa&mercury222 |
提示用户名错误 |
提示用户名错误 |
√ |
|
5 |
Wwww& |
提示密码不为空 |
提示密码不为空 |
√ |
|
6 |
&mercury |
提示用户名不为空 |
提示用户名不为空 |
√ |
|
7 |
www&mercury |
登录成功 |
登录成功 |
√ |
|
8 |
ww ww&mercury |
登录成功 |
登录成功 |
√ |
|
9 |
www &mercury |
登录成功 |
登录成功 |
√ |
|
10 |
Aaaa& mercury |
提示密码错误 |
提示密码错误 |
√ |
|
11 |
Bbbb&merc ury |
提示密码错误 |
提示密码错误 |
√ |
|
12 |
Cccc&mercury |
提示密码错误 |
提示密码错误 |
√ |
|
13 |
Null&mercury |
登录成功 |
登录成功 |
√ |
|
14 |
!@#$%&mercury |
登录成功 |
登录成功 |
√ |
|
15 |
李先生&mercury |
提示用户名错误 |
登录成功 |
× |
2. 编写脚本代码
Dim url url="D:\360Downloads\Software\软件测试QTP\TDPlugin\samples\flight\app\flight3a.exe" if Dialog("Login").Exist(1) Then OptionalStep.Dialog("Login").WinEdit("Agent Name:").Set DataTable("username", dtGlobalSheet) OptionalStep.Dialog("Login").WinEdit("Password:").Set DataTable("password", dtGlobalSheet) OptionalStep.Dialog("Login").WinButton("OK").Click else ‘如果QTP不能自己打开被测试程序就使用该功能打开 SystemUtil.Run url OptionalStep.Dialog("Login").WinEdit("Agent Name:").Set DataTable("username", dtGlobalSheet) OptionalStep.Dialog("Login").WinEdit("Password:").Set DataTable("password", dtGlobalSheet) OptionalStep.Dialog("Login").WinButton("OK").Click End if ‘检查点 if Dialog("Login").Dialog("Flight Reservations").Exist(2)Then Dim Errorinfor ‘对错误提示信息做一个检查点，并根据实际情况进行参数化 Dialog("Login").Dialog("Flight Reservations").Static("Agent name must be at").Check CheckPoint("Agent name must be at") Errorinfor=Dialog("Login").Dialog("Flight Reservations").Static("Agent name must be at").GetROProperty("text") Dialog("Login").Dialog("Flight Reservations").WinButton("确定").Click Reporter.ReportEvent micPass, "用户名验证通过，提示信息如下",Errorinfor OptionalStep.Dialog("Login").Close else ‘如果用户名和密码正确就进入订票页面 if Window("Flight Reservation").Exist (2) Then Reporter.ReportEvent micPass, "登录验证通过","用户名密码正确" Window("Flight Reservation").close End if End if
3. 结果
4.测试小结
通过对QTP飞机订票系统的黑盒自动化测试，初步掌握了如何进行自动化测试从而省去了许多重复的工作。登录时不能识别中文字符，即把中文字符当作2个字符处理，另外该程序仅根据用户输入的长度是否大于4判断用户名正确性且可以包含空格，密码则必须是mercury(忽略大小写)且不能包含空格。总结来说一个功能的测试应该写一个测试脚本，对不同的测试数据可以采用脚本代码设置条件的方式来进行判断，如果功能较为复杂的话可以考虑使用多个测试脚本进行测试。
标签：通过 了解 控件实现 成功 step font system justify 不同
原文地址：http://www.cnblogs.com/k511959373/p/7074699.html
