51Testing软件测试论坛

标题: QTP无法录制VC++程序?右键菜单出来后,点菜单项动作无法录制下来 [打印本页]

作者: yaoye13    时间: 2011-10-13 11:42
标题: QTP无法录制VC++程序?右键菜单出来后,点菜单项动作无法录制下来
本人在录制用VC++编写的应用程序过程中遇到下面的问题.
[attach]75590[/attach]
这个是右键菜单点出来的菜单选项,下一个动作是,选中其中一个"新建表分组",再会弹出一个窗口.
脚本如下:
Window("集成平台").WinTreeView("WinTreeView").Select "数据库 [test];所有表[共1张表]",micRightBtn
Window("集成平台").Dialog("新建表分组").WinEdit("表分组名称:").Set "t"
Window("集成平台").Dialog("新建表分组").WinEdit("表分组描述:").Set "t"
Window("集成平台").Dialog("新建表分组").WinButton("确定").Click
从脚本可以看出,右键菜单出来后,选中一个选项,单击,这个动作没有录制下来,
回放时候到第2步,出错
[attach]75593[/attach]
于是用spy识别这个右键菜单:
[attach]75591[/attach]
把这个对象加到对象库后,
[attach]75594[/attach]
在脚本第二行,增加如下代码:
Window("集成平台").Window("Window").Click 927, 383,micLeftBtn
可是还是不行,
回放脚步,还是只到弹出右键菜单,到第二步,又出错:
[attach]75592[/attach]
求助各位前辈,这类问题如何解决?还是QTP对VC++根本就支持不好呢?
作者: softCore    时间: 2011-10-13 12:23
Window("集成平台").WinTreeView("WinTreeView").Select "数据库 [test];所有表[共1张表]",micRightBtn
Wait (3) 'try add this to script
Window("集成平台").Dialog("新建表分组").WinEdit("表分组名称:").Set "t"
Window("集成平台").Dialog("新建表分组").WinEdit("表分组描述:").Set "t"
Window("集成平台").Dialog("新建表分组").WinButton("确定").Click
作者: yaoye13    时间: 2011-10-13 15:01
回复 2# softCore


    还是第一个错啊,parent properties的错!
作者: softCore    时间: 2011-10-13 17:39
还是弹出的这个右键菜单的识别有点问题,我对录制这块不算熟悉,感觉这个弹出菜单的窗体识别有点问题,我晚上回去看看,也许真的需要map?
作者: softCore    时间: 2011-10-13 20:44
http://bbs.51testing.com/archiver/tid-82266.html 这里有个对右键无法识别时的模拟键盘算法,可以尝试一下,你的parent对象之所以找不到,是因为qtp无法识别你的右键菜单操作。
作者: yaoye13    时间: 2011-10-14 10:22
回复 5# softCore


    嗯,谢谢,我试试看
我问过开发人员,这个右键菜单是: CMenu::TrackPopupMenu
可是spy识别出来的是个window,感觉好像确实是识别不了.
作者: yaoye13    时间: 2011-10-14 11:44
这里有个对右键无法识别时的模拟键盘算法,可以尝试一下,你的parent对象之所以找不到,是因为qtp无法识别 ...
softCore 发表于 2011-10-13 20:44



    十分感谢您提供的帮助,问题已经解决了,代码如下:
Window("集成平台").WinTreeView("WinTreeView").Select "数据库 [test];所有表[共1张表]",micRightBtn
Set wshShell = CreateObject("WScript.Shell")
wshShell.SendKeys"{DOWN}"
wshShell.SendKeys"{DOWN}"
wshShell.SendKeys"{ENTER}"
wait 1  
Window("集成平台").Dialog("新建表分组").WinEdit("表分组名称:").Set "t"
Window("集成平台").Dialog("新建表分组").WinEdit("表分组描述:").Set "t"
Window("集成平台").Dialog("新建表分组").WinButton("确定").Click




欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/) Powered by Discuz! X3.2