51Testing软件测试论坛

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

QQ登录

只需一步,快速开始

微信登录,快人一步

查看: 3535|回复: 5
打印 上一主题 下一主题

[求助] 请教DP高手看是否QTP的BUG或其他用法错误

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2008-1-9 19:19:06 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
ChildObjects方法的参数中是一个properties对象,此处必须使用描述性编程的方法定义对象。
如果在value里使用了正则表达式,我发现怎么弄都不生效,childObjects取不到对象。

以下是代码,我打开一个notepad做测试
第一段是使用了正则表达式,找到的notepad窗体总是为0
第二段是没有用到正则表达式,可以找到notepad窗体数量为1
请教高手看是否有什么错误。
谢谢。
=========================
Set oDesc = Description.Create()
oDesc("text").Value = "U.*Notepad$"
oDesc("text").RegularExpression = True
Set OpenedNotepadWindows=Desktop.ChildObjects(oDesc)
msgbox OpenedNotepadWindows.Count ' you get 0
Window(oDesc).Close 'it always works
Set oDesc = Nothing

=========================
Set oDesc = Description.Create()
oDesc("text").Value = "Untitled - Notepad"
oDesc("text").RegularExpression = True
Set OpenedNotepadWindows=Desktop.ChildObjects(oDesc)
msgbox OpenedNotepadWindows.Count ' you get 1
Window(oDesc).Close 'it always works
Set oDesc = Nothing
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

  • TA的每日心情
    开心
    2016-2-27 08:48
  • 签到天数: 2 天

    连续签到: 1 天

    [LV.1]测试小兵

    2#
    发表于 2008-1-10 01:08:31 | 只看该作者
    初步判断是 oDesc("text").Value = "U.*Notepad$"引起的。
    1,你的QTP版本是?
    2, 仔细检查一下 这个正则表达式是否可以达到你要的效果。
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    3#
    发表于 2008-1-10 01:48:58 | 只看该作者
    替代方案:oDesc("regexpwndclass").Value = "Notepad"

    Desktop好像有点问题,普通的根对象用这种方法没问题。期待正解

    [ 本帖最后由 jackymail 于 2008-1-10 02:03 编辑 ]
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    4#
     楼主| 发表于 2008-1-10 09:43:22 | 只看该作者
    原帖由 walker1020 于 2008-1-10 01:08 发表
    初步判断是 oDesc("text").Value = "U.*Notepad$"引起的。
    1,你的QTP版本是?
    2, 仔细检查一下 这个正则表达式是否可以达到你要的效果。


    版主要带好头,不要为了没啥意义的积分灌白开水
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    5#
     楼主| 发表于 2008-1-10 10:58:00 | 只看该作者
    原帖由 jackymail 于 2008-1-10 01:48 发表
    替代方案:oDesc("regexpwndclass").Value = "Notepad"

    Desktop好像有点问题,普通的根对象用这种方法没问题。期待正解


    看来是Desktop对象有问题。
    打开notepda的font设置,运行下面代码,可以找到font对话框
    Set oDesc = Description.Create()
    oDesc("regexpwndtitle").Value = ".*t$"
    oDesc("regexpwndtitle").RegularExpression = True
    Set OpenedNotepadWindows=Window("regexpwndclass:=Notepad").ChildObjects(oDesc)
    msgbox OpenedNotepadWindows.Count ' you get 1
    Set oDesc = Nothing

    没有其他办法的话,只好用GetROProperty绕过去了。

    以下是国外论坛上找到的同样问题,有回复如下:

    http://www.sqaforums.com/showfla ... PSESSID=#Post446909

    ==============================
    Re: Newbie QTP Regular Expression Difficulties  [Re:  gy21st]
          #447101 - 01/09/08 08:31 AM        
    Edit post Edit           Reply to this post Reply           Reply to this post Quote           Quick Reply Quick Reply  

    ChildObject implementation is not always reliable and as per my recent SR with HP they told me that RE might not always work for some properties. And i doubt that Desktop.ChildObject would be as good as Browser().Page().ChildObjects

    Because Desktop is not a TestObject but a reserved object.

    --------------------
    Tarun
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    6#
    发表于 2008-1-10 17:03:18 | 只看该作者
    确实应该是Desktop.ChildObject 的问题,在帮助中也能看出它的一丝特殊性,估计还是mercury(HP)设计考虑不够周全
    回复 支持 反对

    使用道具 举报

    本版积分规则

    关闭

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

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

    GMT+8, 2024-5-2 10:27 , Processed in 0.070865 second(s), 27 queries .

    Powered by Discuz! X3.2

    © 2001-2024 Comsenz Inc.

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