51Testing软件测试论坛

标题: 有关CTRL建的录制 [打印本页]

作者: 卓振 时间: 2008-11-20 14:06
标题: 有关CTRL建的录制
我想实现点击CTRL鼠标左键双击这个动作，但是试了好几种方法，
1、Dim wshShell
Set wshShell = CreateObject("WScript.Shell")
Window("SuperClient").Window("172.16.95.120").WinObject("AfxFrameOrView42").Click
wshShell.SendKeys "^+{DblClick 33,60}"------------这个地方有问题
2、'wshShell.KeyPress = 11
'Window("SuperClient").Window("172.16.95.120").WinObject("AfxFrameOrView42").DblClick 33,60
提示“对象不支持此属性或方法：‘keypress’”

请高手帮解决一下、、、、
谢谢~~~~~~

作者: lingxin5013 时间: 2008-11-20 15:24
QTP不支持键盘和鼠标同时操作
给你个建议：
1:移动鼠标到你到click的对象上面（这个很简单吧 move 就可以了）
2：使用senkkeys "^+{Enter}"
希望对你有帮助。

作者: 卓振 时间: 2008-11-21 13:56
标题: 回复 2# 的帖子
Dim wshShell
Set wshShell = CreateObject("WScript.Shell")
Window("SuperClient").Window("172.16.95.120").WinObject("AfxFrameOrView42").MouseMove 170,37
wshShell.SendKeys "^+{Enter}"
Window("SuperClient").Dialog("指定设备").WinComboBox("ComboBox").Select "FE01"
Window("SuperClient").Dialog("指定设备").WinButton("确定(O)").Click

谢谢你教给我的方法，上面是我写的代码，但还是不能代替“ctrl+双击鼠标”这个操作，
还是要谢谢你。o(∩_∩)o...

作者: lingxin5013 时间: 2008-11-21 16:51
sendkeys 是不支持键盘和鼠标组合操作的。
能否说下你这个sendkeys的目的是什么？换个办法解决

作者: 卓振 时间: 2008-11-22 16:21
标题: 回复 4# 的帖子
sendkeys的目的是实现在键盘上点击CTRL键，我有同时说在C++中保持点击ctrl这个键状态时用keypressed这个关键字，但是我不是很明白怎么用
你明白吗？
请指示~~~~~~~~~~~~
o(∩_∩)o...

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)