新人请教：邮件登录报错，请进，不好意思很急

pan123

测试一个邮件登录：
想测试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

你把检查点都插在了,取值语句前面了.

pan123

哦，版主，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

我是按成功登录的例子来录的

pan123

sdlkfj9

pan123

版主，能帮帮忙吗？

winfood

这个登陆流程有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

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

winfood

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

winfood

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