51Testing软件测试论坛

标题: 新人请教：邮件登录报错，请进，不好意思很急 [打印本页]

作者: pan123 时间: 2007-4-19 11:48
标题: 新人请教：邮件登录报错，请进，不好意思很急
测试一个邮件登录：
想测试6 种登录的情况，
1，用户名为空，密码为空
2，用户名正确，密码为空
3，用户名为空，密码正确
4，用户名正确，密码不正确
5，用户名不正确，密码正确
6，用户名正确，密码正确

设置了参数并在用户名和密码处设置了checkpoint，结果qtp显示以前情况没过，能帮手分析下原因吗？
以下是脚本：

---------------------------
Browser("TOM.COM").Page("TOM.COM").Link("免费邮箱").Click
Browser("TOM免费邮箱_1500兆超大容量,一分钟注册,享受终生").Page("TOM免费邮箱_1500兆超大容量,一分钟注册,享受终生").WebEdit("pass").Check CheckPoint("pass")
Browser("TOM免费邮箱_1500兆超大容量,一分钟注册,享受终生").Page("TOM免费邮箱_1500兆超大容量,一分钟注册,享受终生").WebEdit("pass").Set DataTable("pass", dtGlobalSheet)
Browser("TOM免费邮箱_1500兆超大容量,一分钟注册,享受终生").Page("TOM免费邮箱_1500兆超大容量,一分钟注册,享受终生").WebEdit("user").Check CheckPoint("user")
Browser("TOM免费邮箱_1500兆超大容量,一分钟注册,享受终生").Page("TOM免费邮箱_1500兆超大容量,一分钟注册,享受终生").WebEdit("user").Set DataTable("user", dtGlobalSheet)
Browser("TOM免费邮箱_1500兆超大容量,一分钟注册,享受终生").Page("TOM免费邮箱_1500兆超大容量,一分钟注册,享受终生").Image("enter").Click 2,2
Browser("TOM免费邮箱_1500兆超大容量,一分钟注册,享受终生").Page("warning!警告!").WebElement("请先填写用户名与密码").CheckPoint("ouput",dtGlobalSheet)
Browser("TOM免费邮箱_1500兆超大容量,一分钟注册,享受终生").Page("warning!警告!").Image("btn_Confirm").Click 29,6
Browser("TOM免费邮箱_1500兆超大容量,一分钟注册,享受终生").Page("TOM.COM").Sync
Browser("TOM免费邮箱_1500兆超大容量,一分钟注册,享受终生").Close
Browser("TOM.COM").Page("TOM.COM").Sync
Browser("TOM.COM").Close

[ 本帖最后由 pan123 于 2007-4-20 17:05 编辑 ]

作者: xiaonan 时间: 2007-4-19 14:30
你把检查点都插在了,取值语句前面了.

作者: pan123 时间: 2007-4-19 15:44
哦，版主，checkpoint的问题改了，但是生成的结果还是错误了，
Browser("TOM.COM").Page("TOM.COM").Link("免费邮箱").Click
Browser("TOM免费邮箱_1500兆超大容量,一分钟注册,享受终生").Page("TOM免费邮箱_1500兆超大容量,一分钟注册,享受终生").WebEdit("user").Set DataTable("user", dtGlobalSheet)
Browser("TOM免费邮箱_1500兆超大容量,一分钟注册,享受终生").Page("TOM免费邮箱_1500兆超大容量,一分钟注册,享受终生").WebEdit("user").Check CheckPoint("user_3")
Browser("TOM免费邮箱_1500兆超大容量,一分钟注册,享受终生").Page("TOM免费邮箱_1500兆超大容量,一分钟注册,享受终生").WebEdit("pass").SetSecure DataTable("pass", dtGlobalSheet)
Browser("TOM免费邮箱_1500兆超大容量,一分钟注册,享受终生").Page("TOM免费邮箱_1500兆超大容量,一分钟注册,享受终生").WebEdit("pass").Check CheckPoint("pass")
Browser("TOM免费邮箱_1500兆超大容量,一分钟注册,享受终生").Page("TOM免费邮箱_1500兆超大容量,一分钟注册,享受终生").Image("enter").Click 2,2
Browser("TOM免费邮箱_1500兆超大容量,一分钟注册,享受终生").Page("TOM 免费邮箱").Frame("folder").Link("退出账户").Click
Browser("TOM免费邮箱_1500兆超大容量,一分钟注册,享受终生").Page("TOM免费邮箱_1500兆超大容量,一分钟注册,享受终生_2").Sync
Browser("TOM免费邮箱_1500兆超大容量,一分钟注册,享受终生").Close
Browser("TOM.COM").Page("TOM.COM").Sync
Browser("TOM.COM").Close

作者: pan123 时间: 2007-4-19 15:45
我是按成功登录的例子来录的

作者: pan123 时间: 2007-4-20 09:06
sdlkfj9

作者: pan123 时间: 2007-4-20 17:06
版主，能帮帮忙吗？

作者: winfood 时间: 2007-4-22 09:51
这个登陆流程有6个用户数据，相应的有6个不同的结果需要验证。那是不是应该有6个CheckPoint？
你的脚本里面只用了一个CheckPoint，而且是在正确流程下面录制的。也就是第6组数据的情况。如果测试脚本本身没有错误的话，得到的结果应该是5个错误和1个正确。

测试脚本里面应该添加流程控制，并且增加相应的CheckPoint才能达到目的。
比如：
If Case1 Then
****.Check CheckPoint("Case1")
ElseIf Case2 Then
****.Check CheckPoint("Case2")
... ...
ElseIf Case6 Then
****.Check CheckPoint("Case6")
End If
当测试脚本运行的时候，才能根据不用的用户数据验证不同的结果。

作者: pan123 时间: 2007-4-23 09:51
噢，谢谢！
但是因为我看不懂vb，有没有在qtp上设置什么就能自动生成这些循环语句的？
或者谁有比较完整的脚本?
刚学，想摸索一下！sdlkfj1

作者: winfood 时间: 2007-4-23 11:01
如果你要长期使用QTP的话，VBScirpt和编程是必经之路。QTP有几个自动生成语句的功能，用来创建函数和子程序。这种分支条件的语句，QTP主要是输入If后自动生成If... Then... End If的简单处理。
QTP的帮助里面可以找到一些参考的代码，网上也可以找到一些。

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)