可以录制,但回放不了,怎么解决?求帮助??
本帖最后由 lxm18 于 2012-5-28 17:27 编辑代码如下,操作:在”设备列表“上按鼠标右键弹出来”添加设备“的小框后,选中”添加设备“然后进行下面步骤,但回放时就停留在如下界面不动了,稍后报错,怎么解决?
Dialog("JAV客户端").WinTreeView("SysTreeView32").Select "设备列表", micRightBtn
Dialog("JAV客户端").Dialog("添加设备").WinButton("查找").Click 报的什么错误?
如果窗体固定,可以尝试用low-record模式录制。 回复 1# lxm18
只有这两句么,从第2句来看,是点击的“添加设备 ”弹出框中的查找。但是上一句一周点击【设备列表】的右键操作,没有打开【添加设备】弹出框的操作,自然就找不到【添加设备】弹出框中的【查找】按钮,所以这两句之间少了一句。
可能是QTP不能正常识别右键菜单导致。
可以尝试以下操作试试
Dim WshShell
Set WshShell = CreateObject("WScript.Shell")
Dialog("JAV客户端").WinTreeView("SysTreeView32").Select "设备列表", micRightBtn
WshShell.SendKeys "{DOWN}"
WshShell.SendKeys "{ENTER}"
Dialog("JAV客户端").Dialog("添加设备").WinButton("查找").Click
Set WshShell = Nothing 非常感谢!的确是QTP不能识别那个鼠标右键的“添加设备”,后来用键盘快捷键的方式解决。中间加了一句代码如下:
Dialog("JAV客户端").WinTreeView("SysTreeView32").Select "设备列表", micRightBtn
createObject("wscript.shell").sendkeys "d"
Dialog("JAV客户端").Dialog("添加设备").WinButton("查找").Click
我运行你的代码不过还是没有通过,不知道和你的有什么区别,好像大致是一样的。 回复 5# lxm18
嗯,对的,我写的是我猜测用光标上下可以选择,可能你那控件不能用上下,但可以用快捷键“D”。
代码写法是一样的,等同于:
Dim WshShell
Set WshShell = CreateObject("WScript.Shell")
Dialog("JAV客户端").WinTreeView("SysTreeView32").Select "设备列表", micRightBtn
WshShell.SendKeys "D"
Dialog("JAV客户端").Dialog("添加设备").WinButton("查找").Click
Set WshShell = Nothing 回复 6# 黑羽祭
thank you very much!通过!
页:
[1]