51Testing软件测试论坛

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

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 2710|回复: 11
打印 上一主题 下一主题

[求助] QTP找不到对象?

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2009-6-8 17:23:38 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
最近刚学QTP,录制了一个注册的脚本,经过修改后回放,总是提示找不到对象,请哪位高手指点一下,谢谢!脚本如下:

Dim check_user,check_passwd,check_pswcopy, check_email

Browser("欢迎光临 xxx招聘网站 首页").Page("欢迎光临 xxx招聘网站 首页").Link("企业免费注册").Click

Browser("欢迎光临 xxx招聘网站 首页").Page("xxx-企业注册").WebEdit("userName").Set DataTable("user", dtGlobalSheet)
Browser("欢迎光临 xxx招聘网站 首页").Page("xxx-企业注册").Image("sure").Check CheckPoint("sure_1")
check_user=DataTable.Value("check_user","Action1")
Browser("欢迎光临 xxx招聘网站 首页").Page("xxx-企业注册").WebElement(check_user).Check CheckPoint(check_user)

Browser("欢迎光临 xxx招聘网站 首页").Page("xxx-企业注册").WebEdit("password").SetSecure DataTable("passwd", dtGlobalSheet)
Browser("欢迎光临 xxx招聘网站 首页").Page("xxx-企业注册").Image("sure").Check CheckPoint("sure_2")
check_passwd=DataTable.Value("check_passwd",Action1)
Browser("欢迎光临 xxx招聘网站 首页").Page("xxx-企业注册").WebElement(check_passwd).Check CheckPoint(check_passwd)

Browser("欢迎光临 xxx招聘网站 首页").Page("xxx-企业注册").WebEdit("passwordCopy").SetSecure DataTable("pswcopy", dtGlobalSheet)
Browser("欢迎光临 xxx招聘网站 首页").Page("xxx-企业注册").Image("sure").Check CheckPoint("sure_3")
check_pswcopy=DataTable.Value("check_pswcopy",Action1)
Browser("欢迎光临 xxx招聘网站 首页").Page("xxx-企业注册").WebElement(check_pswcopy).Check CheckPoint(check_pswcopy)

Browser("欢迎光临 xxx招聘网站 首页").Page("xxx-企业注册").WebEdit("email").Set DataTable("email", dtGlobalSheet)
Browser("欢迎光临 xxx招聘网站 首页").Page("xxx-企业注册").Image("sure").Check CheckPoint("sure_4")
check_email=DataTable.Value("check_email",Action1)
Browser("欢迎光临 xxx招聘网站 首页").Page("xxx-企业注册").WebElement(check_email).Check CheckPoint(check_email)

Browser("欢迎光临 xxx招聘网站 首页").Page("xxx-企业注册").WebButton("《xxx企业会员服务协议》").Click
Browser("欢迎光临 xxx招聘网站 首页").Page("xxx-企业注册").WebCheckBox("comProtocolBox").Set "ON"
Browser("欢迎光临 xxx招聘网站 首页").Page("xxx-企业注册").WebButton("下一步").Click

If Browser("欢迎光临 xxx招聘网站 首页").Page("xxx-企业注册").WebElement(check_user).Exist(1) Then
    Select Case check_user
                Case "请输入企业帐号"
                        Browser("欢迎光临 xxx招聘网站 首页").Close
                        Reporter.ReportEvent micPass,"注册失败",check_user
                Case "企业帐号长度为6-20位!"
                        Browser("欢迎光临 xxx招聘网站 首页").Close
                        Reporter.ReportEvent micPass,"注册失败",check_user
                Case "企业帐号只能由字母或数字组成"
                        Browser("欢迎光临 xxx招聘网站 首页").Close
                        Reporter.ReportEvent micPass,"注册失败",check_user
                Case "该帐号已被使用"
                        Browser("欢迎光临 xxx招聘网站 首页").Close
                        Reporter.ReportEvent micPass,"注册失败",check_user
                Case else
                        Browser("欢迎光临 xxx招聘网站 首页").Close
                        Reporter.ReportEvent micFail,"注册失败","异常错误!"
        End Select

elseIf Browser("欢迎光临 xxx招聘网站 首页").Page("xxx-企业注册").WebElement(check_passwd).Exist(1) Then
    Select Case check_passwd
                Case "请输入密码"
                        Browser("欢迎光临 xxx招聘网站 首页").Close
                        Reporter.ReportEvent micPass,"注册失败",check_passwd
                Case "密码长度为6-20位!"
                        Browser("欢迎光临 xxx招聘网站 首页").Close
                        Reporter.ReportEvent micPass,"注册失败",check_passwd
                Case "密码只能由字母或数字组成!"
                        Browser("欢迎光临 xxx招聘网站 首页").Close
                        Reporter.ReportEvent micPass,"注册失败",check_passwd
                Case else
                        Browser("欢迎光临 xxx招聘网站 首页").Close
                        Reporter.ReportEvent micFail,"注册失败","异常错误!"
        End Select

elseIf Browser("欢迎光临 xxx招聘网站 首页").Page("xxx-企业注册").WebElement(check_pswcopy).Exist(1) Then
    Select Case check_pswcopy
                Case "不能为空"
                        Browser("欢迎光临 xxx招聘网站 首页").Close
                        Reporter.ReportEvent micPass,"注册失败",check_pswcopy
                Case "两次输入的密码不一致"
                        Browser("欢迎光临 xxx招聘网站 首页").Close
                        Reporter.ReportEvent micPass,"注册失败",check_pswcopy
                Case else
                        Browser("欢迎光临 xxx招聘网站 首页").Close
                        Reporter.ReportEvent micFail,"注册失败","异常错误!"
        End Select

elseIf Browser("欢迎光临 xxx招聘网站 首页").Page("xxx-企业注册").WebElement(check_email).Exist(1) Then
    Select Case check_email
                Case "请输入电子邮箱"
                        Browser("欢迎光临 xxx招聘网站 首页").Close
                        Reporter.ReportEvent micPass,"注册失败",check_email
                Case "电子邮箱格式不正确"
                        Browser("欢迎光临 xxx招聘网站 首页").Close
                        Reporter.ReportEvent micPass,"注册失败",check_email
                Case else
                        Browser("欢迎光临 xxx招聘网站 首页").Close
                        Reporter.ReportEvent micFail,"注册失败","异常错误!"
        End Select

else
        Browser("欢迎光临 xxx招聘网站 首页").Page("xxx-企业注册_2").WebEdit("homepage").Set "http://www.baidu.com"
        Browser("欢迎光临 xxx招聘网站 首页").Page("xxx-企业注册_2").WebButton("完成注册").Click
        Browser("欢迎光临 xxx招聘网站 首页").Page("企业管理首页").Sync
        Browser("欢迎光临 xxx招聘网站 首页").Close
        Reporter.ReportEvent micPass,"注册成功","成功注册!"
end if

DataTable.ExportSheet "D:\bbb\aaa.xls",1

回放后提示:The "sure_1" CheckPoint 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.
Line (6): "Browser("欢迎光临 德才源招聘网站 首页").Page("德才源-企业注册").Image("sure").Check CheckPoint("sure_1")".
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

该用户从未签到

2#
 楼主| 发表于 2009-6-8 17:43:53 | 只看该作者
哪位高手指点我们新手一下下啊
回复 支持 反对

使用道具 举报

该用户从未签到

3#
发表于 2009-6-8 17:45:42 | 只看该作者
把你做检查点的 对象加到对象库里面去
回复 支持 反对

使用道具 举报

该用户从未签到

4#
 楼主| 发表于 2009-6-8 17:48:06 | 只看该作者
试试
回复 支持 反对

使用道具 举报

该用户从未签到

5#
 楼主| 发表于 2009-6-8 17:53:53 | 只看该作者
不行啊,还是一样
回复 支持 反对

使用道具 举报

该用户从未签到

6#
 楼主| 发表于 2009-6-8 18:05:07 | 只看该作者
将 Browser("欢迎光临 xxx招聘网站 首页").Page("xxx-企业注册").Image("sure").Check CheckPoint("sure_1")  注释掉以后,下一行 Browser("欢迎光临 xxx招聘网站 首页").Page("xxx-企业注册").WebElement(check_user).Check CheckPoint(check_user)  也识别不出来
回复 支持 反对

使用道具 举报

该用户从未签到

7#
 楼主| 发表于 2009-6-8 18:06:02 | 只看该作者
高手指点下啊
回复 支持 反对

使用道具 举报

  • TA的每日心情
    难过
    2015-9-21 13:50
  • 签到天数: 4 天

    连续签到: 1 天

    [LV.2]测试排长

    8#
    发表于 2009-6-8 19:22:12 | 只看该作者
    提示的信息是....?
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    9#
     楼主| 发表于 2009-6-9 17:14:49 | 只看该作者

    回复8#

    和原来的相同
    回复 支持 反对

    使用道具 举报

  • TA的每日心情
    难过
    2015-9-21 13:50
  • 签到天数: 4 天

    连续签到: 1 天

    [LV.2]测试排长

    10#
    发表于 2009-6-10 09:39:09 | 只看该作者
    The "sure_1" CheckPoint 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.

    【将 Browser("欢迎光临 xxx招聘网站 首页").Page("xxx-企业注册").Image("sure").Check CheckPoint("sure_1")  注释掉以后,下一行 Browser("欢迎光临 xxx招聘网站 首页").Page("xxx-企业注册").WebElement(check_user).Check CheckPoint(check_user)  也识别不出来】

    <<<对象不存在……,需要添加对象到对象库……
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    11#
    发表于 2009-6-10 11:04:33 | 只看该作者
    用对象管理吧  用这个捕捉一下  然后加到你的脚本中
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    12#
     楼主| 发表于 2009-6-11 09:44:58 | 只看该作者

    回复11#的帖子

    具体怎么操作啊,我是新手,对这块不是很熟悉,感谢!!!
    回复 支持 反对

    使用道具 举报

    本版积分规则

    关闭

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

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

    GMT+8, 2024-11-27 13:00 , Processed in 0.079445 second(s), 28 queries .

    Powered by Discuz! X3.2

    © 2001-2024 Comsenz Inc.

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