用qtp测试用户登录问题。。。急，弄了二天了

ALEN灬chen

用qtp测试用户登录

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

Browser("网银申报系统").Page("网银申报系统").WebEdit("username").Set DataTable("username", dtLocalSheet)
Browser("网银申报系统").Page("网银申报系统").WebEdit("password").SetSecure DataTable("password", dtLocalSheet)
Browser("网银申报系统").Page("网银申报系统").WebElement("WebButton").Click

'但是我想要的是验正时弹出一个提示层来验正输入是否正确。下面一行的文本验正应该如何修改？？
Browser("网银申报系统").Page("网银申报系统").WebElement("请输入正确的用户名")Output CheckPoint("请输入正确的用户名")'插入文本输出点
outputvalue=datatable("stamsg",dtlocalsheet) '将实际输出值赋于变量outputvalue
dateh=datatable("status",dtlocalsheet) '将预期值赋于变量dateh

If  outputvalue<>dateh Then
  Reporter.ReportEvent  1, "登录功能测试", "预期值为 " &dateh & " 实际值为" &outputvalue
　Browser("网银申报系统").Close
End If
Browser("网银申报系统").Page("网银申报系统").Frame("menu").Link("退出系统").Click
Browser("网银申报系统").Page("网银申报系统").Sync
Browser("网银申报系统").Close

以上是脚本代码
我如果是正确的帐号和密码，运行到检查点那行就出错了，请怎样做到，输入正确的可以运行，错误的也可以运行呢

lantianwei

1. 如果对QTP不是很熟悉 建议先简化问题 然后再发现问题出在何处 即不要把参数化啥的都放进来 那只会增加解决问题的复杂度
2. 你都没说出啥错 别人怎么 帮你呢？？
3. 文本检查点 取出值来 比较下就行了 用getroproperty啥的 能取出来就行
给你个例子吧
sUserName=Browser("网银申报系统").Page("网银申报系统").WebElement("请输入正确的用户名").GetROProperty("Value")
if sUserName=sExpUserName
.....

ALEN灬chen

也不行，我不要data table，用你这种方法，输入正确的帐号和密码，也是运行到“sUserName=Browser("网银申报系统").Page("网银申报系统").WebElement("请输入正确的用户名").GetROProperty("Value")”就停住了

souchy

冒似“请输入正确的用户名密码”是个错误提示，在输入正确的情况下它不会出现，那么文本检查时如果设计的不准确，那么不能运行下去再正常不过了。
建议：
1.问题描述时能将功能描述清楚
2.出错最好把报错信息也贴上来

lijinshui

outputvalue=datatable("stamsg",dtlocalsheet) '将实际输出值赋于变量outputvalue
dateh=datatable("status",dtlocalsheet) '将预期值赋于变量dateh
你的期待值和出力值不都是从datatable里面取出来的吗

dftx511619

原帖由 souchy 于 2009-12-14 18:26 发表
冒似“请输入正确的用户名密码”是个错误提示，在输入正确的情况下它不会出现，那么文本检查时如果设计的不准确，那么不能运行下去再正常不过了。
建议：
1.问题描述时能将功能描述清楚
2.出错最好把报错信息也贴 ...

正解！  这个提示肯定是你录制过程中， 输入错误的用户名和密码后的一个提示， 然后你点掉，

然后你继续录制了！ 当然，你回放的话， 可能会出点问题！

还有建议： LZ 将排版做好一些，让别人解决问题 看着方便一点， 还有就是 把错误点 贴出来！！

liuxl

我的习惯是这样处理的：加个if判断
if 登陆成功 then
    比较结果，关闭页面，输出报告
else
    比较提示文本
end if

对于if中的登陆成功，你可以找一个登陆成功的特征来比较，比如，也许登陆成功进入了某页面，可以在if语句中这样处理：
if .......页面.exist then
.....