QTP中点击右键的录制

bluestone

紧急求助！！
.Net写的系统，想选择点击鼠标右键后的pop up菜单，在网上搜了一下，写了以下的代码。
但好像不起作用，貌似右键是点过的，但之后菜单貌似保持不住的，也就是说右键点是点了，
但点了之后菜单没了，所以之后再操作键盘根本选不到我想要选的菜单选项. Why？？？

SwfWindow("XXXXX").SwfWindow("XXXXX").SwfTable("XXXXX").Click 100,40 ,micRightBtn
Dim wshShell
     Set wshShell = CreateObject("WScript.Shell")
     wshShell.SendKeys "{UP}"   
     wshShell.SendKeys "{RIGHT}"
     wshShell.SendKeys "{UP}"
     wshShell.SendKeys "{ENTER}"

[ 本帖最后由 bluestone 于 2008-10-28 16:32 编辑 ]

jifeng

查看是不是由于被测程序失去焦点，导致失败。

Tools-->Options-->Run-->中的Save still image captures to results有时会有影响。
参考：http://www.testage.net/html/68/36168-140598.html

blueeagle9999

加个wait()，看看右键点下去之后是否菜单真会没掉

假装不在

1，修改掉ReplayType为2，一般情况默认设置是1的。
       1 - 使用浏览器事件运行鼠标操作。
       2 - 使用鼠标运行鼠标操作。
2，模拟一个鼠标的click时间，一般一个click包括了
  micLeftBtn 0 鼠标左键。  
  micRightBtn 1 鼠标右键。  
  micMiddleBtn 2 鼠标中键。  

所以总的代码可以这么写：
Setting.WebPackage("ReplayType") = 2
browser().page().某个对象.click ,,micRightBtn     '在这里之所以还多了2点，就是因为少了X,Y，我们默认不写的情况就它会点击那个对象
Setting.WebPackage("ReplayType") = 1    '把它的回放模式设置回来。