51Testing软件测试论坛

标题: 用qtp测试用户登录 [打印本页]

作者: zjl2009 时间: 2009-9-28 15:26
标题: 用qtp测试用户登录
Dim i  '定义行号
Dim outputvalue '读取系统实际的输出值的变量
Dim  dateh '定义系统预期提示信息的变量

For  i=1 to datatable.GetSheet("Action1").getrowcount

Browser("江苏省政务和公益域名网上申报系统").Page("江苏省政务和公益域名网上申报系统").WebEdit("username").Set DataTable("username", dtLocalSheet)
Browser("江苏省政务和公益域名网上申报系统").Page("江苏省政务和公益域名网上申报系统").WebEdit("password").SetSecure DataTable("password", dtLocalSheet)
Browser("江苏省政务和公益域名网上申报系统").Page("江苏省政务和公益域名网上申报系统").Image("dl").Click 28,17

'但是我想要的是验正时弹出一个对话框来验正输入是否正确。下面一行的文本验正应该如何修改？？
Browser("江苏省政务和公益域名网上申报系统").Page("江苏省政务和公益域名网上申报系统").Output CheckPoint("江苏省政务和公益域名网上申报系统")'插入文本输出点

outputvalue=datatable("stamsg",dtlocalsheet) '将实际输出值赋于变量outputvalue
dateh=datatable("status",dtlocalsheet) '将预期值赋于变量dateh

If outputvalue<>dateh Then
Reporter.ReportEvent 1, "登录功能测试", "预期值为 " &dateh & " 实际值为" &outputvalue
End If
datatable.GetSheet("Action1").setnextrow '获取action1中的下一行数据
Next

Browser("江苏省政务和公益域名网上申报系统").Page("江苏省政务域名网上申报系统").Frame("menu").Link("退出系统").Click
Browser("江苏省政务和公益域名网上申报系统").Page("江苏省政务和公益域名网上申报系统").Sync
Browser("江苏省政务和公益域名网上申报系统").Close

作者: 月上百合 时间: 2009-9-28 17:09
弱弱的问一句，outputvalue=datatable("stamsg",dtlocalsheet) '将实际输出值赋于变量outputvalue
dateh=datatable("status",dtlocalsheet) '将预期值赋于变量dateh

If outputvalue<>dateh Then
Reporter.ReportEvent 1, "登录功能测试", "预期值为 " &dateh & " 实际值为" &outputvalue
End If
datatable.GetSheet("Action1").setnextrow '获取action1中的下一行数据
Next

Browser("江苏省政务和公益域名网上申报系统").Page("江苏省政务域名网上申报系统").Frame("menu").Link("退出系统").Click
Browser("江苏省政务和公益域名网上申报系统").Page("江苏省政务和公益域名网上申报系统").Sync
Browser("江苏省政务和公益域名网上申报系统").Close
这段话要写在哪里？在哪里修改

作者: testlab 时间: 2009-9-28 17:17
outputvalue=datatable("stamsg",dtlocalsheet) '将实际输出值赋于变量outputvalue
为何你的实际输出值是在datatable中的?我没看到你之前有output

作者: zjl2009 时间: 2009-9-29 08:37
不是的，你说的代码都不用修改，我说的意思是当有用户登录时，在不符合条件的情况下，会弹出一个对话框来说明，如：请输入用户名。我想问在弹出的对话框中怎么样做文本检查？？我把预期值和实际输出值都放在datatable中的。

要改的可以是这句话：
Browser("江苏省政务和公益域名网上申报系统").Page("江苏省政务和公益域名网上申报系统").Output CheckPoint("江苏省政务和公益域名网上申报系统")'插入文本检查点

作者: prince198509 时间: 2009-11-30 16:49
标题: 回复 1# 的帖子
在跳出文本框之后，先获取文本框里面的static的提示内容，然后与你的datatable表中的预期值做比较，

作者: prince198509 时间: 2009-11-30 16:52
标题: 回复 4# 的帖子
对跳出的文本框里面的内容先获取，在做检查点，哈哈

作者: liuxl 时间: 2009-11-30 17:54
这样的脚本明显复用度是不够的，如果登录成功了怎么办呢？
还有不明白lz到底想问问题还是想让大家参考你的脚本呢？

作者: dftx511619 时间: 2009-11-30 17:59

原帖由 liuxl 于 2009-11-30 17:54 发表
这样的脚本明显复用度是不够的，如果登录成功了怎么办呢？
还有不明白lz到底想问问题还是想让大家参考你的脚本呢？

此楼正解！楼主还需多多学习，努力提高啊！加油！
测试之路虽然很艰辛，但是学习历程却很快乐！！

作者: ALEN灬chen 时间: 2009-12-14 10:21
上楼和上上楼说得很有道理，我也遇到难点，不过你只是提出个问题，有人能给个解决方案吗，期待...

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