51Testing软件测试论坛

 找回密码
 (注-册)加入51Testing

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 2496|回复: 9
打印 上一主题 下一主题

[原创] 请教一个登陆问题

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2008-5-29 10:55:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
求助,想输入用户名和密码,提交后,根据进入的页面来判断是否登陆成功如何编写代码啊,前面录制代码为
Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").WebEdit("userName").Set "mcy111"
Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").WebEdit("password").SetSecure "483e146c13214cc5e7fc1c1c"
Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").Image("Sign-In").Click 23,4

后面不知道改怎么写,如果才能获取到页面的信息呢
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

该用户从未签到

2#
发表于 2008-5-29 11:25:16 | 只看该作者
用exist
检测某个特定的对象是否存在,这样就可以判断了
回复 支持 反对

使用道具 举报

该用户从未签到

3#
 楼主| 发表于 2008-5-29 12:25:14 | 只看该作者
我自己加了一点代码识别,但是出错了,不知道为什么

if Browser("Welcome: Mercury Tours").Page("Find a Flight: Mercury").WebList("fromPort").exist(1) then
        msgbox("登陆失败")
else
          msgbox("登陆成功")
End If

The "Find a Flight: Mercury" Page object was not found in the Object Repository.
Check the Object Repository to confirm that the object exists or to find the correct name for the object.
回复 支持 反对

使用道具 举报

该用户从未签到

4#
发表于 2008-5-29 12:30:15 | 只看该作者
对象问题,仔细检查下对象
回复 支持 反对

使用道具 举报

该用户从未签到

5#
发表于 2008-5-29 12:43:44 | 只看该作者
估计是得等一下。wait(5),让新页面导入。
回复 支持 反对

使用道具 举报

该用户从未签到

6#
 楼主| 发表于 2008-5-29 13:48:28 | 只看该作者
加了wait(10)还是出错

会不会是因为最初录制的时候没有录制该页面照成的结果呢?

因为那个练习的页面,如果登录失败的话会自动转到重新登录界面,如果成功的话自动转到订票的界面,怎么才能自己写代码判断用户名和密码是否正确呢?
回复 支持 反对

使用道具 举报

该用户从未签到

7#
发表于 2008-5-29 16:48:42 | 只看该作者
一般登录成功后,页面上显示登录的用户名,可以用检查点判断.

不知道你的登录成功后,显示登录名不?
回复 支持 反对

使用道具 举报

该用户从未签到

8#
发表于 2008-5-29 17:02:41 | 只看该作者
sync下Page看下
回复 支持 反对

使用道具 举报

该用户从未签到

9#
 楼主| 发表于 2008-5-29 17:18:34 | 只看该作者
就是QTP的测试网页,登陆成功后没有用户名的
但是就算是有用户名的话,如果登陆失败的话是跳到另外一个页面,那登陆成功的页面也不会出来,那提取成功页面的控件操作是不是也会失败啊
回复 支持 反对

使用道具 举报

  • TA的每日心情
    开心
    2015-6-29 10:24
  • 签到天数: 1 天

    连续签到: 1 天

    [LV.1]测试小兵

    10#
    发表于 2008-5-29 20:00:14 | 只看该作者
    原帖由 ymcy_t 于 2008-5-29 12:25 发表
    我自己加了一点代码识别,但是出错了,不知道为什么

    if Browser("Welcome: Mercury Tours").Page("Find a Flight: Mercury").WebList("fromPort").exist(1) then
            msgbox("登陆失败")
    else
              msgbox("登陆成功 ...


    The "Find a Flight: Mercury" Page object was not found in the Object Repository.
    Check the Object Repository to confirm that the object exists or to find the correct name for the object.

    这个不是说这个page在对象库没找到么, 楼主应该去对象库看看有没有存在先
    回复 支持 反对

    使用道具 举报

    本版积分规则

    关闭

    站长推荐上一条 /1 下一条

    小黑屋|手机版|Archiver|51Testing软件测试网 ( 沪ICP备05003035号 关于我们

    GMT+8, 2024-11-9 04:46 , Processed in 0.076859 second(s), 28 queries .

    Powered by Discuz! X3.2

    © 2001-2024 Comsenz Inc.

    快速回复 返回顶部 返回列表