用qtp测试用户登录

zjl2009 发表于 2009-9-28 15:26:49

Dim i'定义行号
Dim outputvalue '读取系统实际的输出值的变量
Dimdateh '定义系统预期提示信息的变量

Fori=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

Ifoutputvalue<>dateh Then
Reporter.ReportEvent1, "登录功能测试", "预期值为 " &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:39

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

Ifoutputvalue<>dateh Then
Reporter.ReportEvent1, "登录功能测试", "预期值为 " &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:24

outputvalue=datatable("stamsg",dtlocalsheet) '将实际输出值赋于变量outputvalue
为何你的实际输出值是在datatable中的?我没看到你之前有output

zjl2009 发表于 2009-9-29 08:37:24

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

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

prince198509 发表于 2009-11-30 16:49:15

回复 1# 的帖子

在跳出文本框之后，先获取文本框里面的static的提示内容，然后与你的datatable表中的预期值做比较，

prince198509 发表于 2009-11-30 16:52:08

回复 4# 的帖子

对跳出的文本框里面的内容先获取，在做检查点，哈哈

liuxl 发表于 2009-11-30 17:54:27

这样的脚本明显复用度是不够的，如果登录成功了怎么办呢？
还有不明白lz到底想问问题还是想让大家参考你的脚本呢？

dftx511619 发表于 2009-11-30 17:59:27

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

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

ALEN灬chen 发表于 2009-12-14 10:21:23

上楼和上上楼说得很有道理，我也遇到难点，不过你只是提出个问题，有人能给个解决方案吗，期待...

页: [1]

51Testing软件测试论坛 's Archiver