QTP中对右键单击的解决办法

这几天写QTP脚本，发现QTP对右键单击的操作不能识别，经过查找资料总结，可以采用wsh的方式，实现右键选择的操作。wsh是通过模拟键盘，向激活窗口发送键值实现相应操作。
K
B(["UE_6bSW_P0
Z
_N9Eg'oc'y*w051Testing软件测试网W&v}|#fp#r*Y
Window("A").WinListView("B").Click 150, 233, micRightBtn   '右键单击出菜单51Testing软件测试网v8rD
@$P9V4N
Window("A").WinObject("B").WinMenu("C").Select "新建(W);<Item 3>"     '在弹出菜单中选择功能功能
hkS-| wg-_051Testing软件测试网2{5Cq:t)s1{0\*h.|%N
上述代码在回放时回放不过去,改为51Testing软件测试网Jsm3O&c"|$I(J9` j
Window("A").WinListView("B").Click 150, 233, micRightBtn
Y @)ii)M2Z0   Dim wshShell
3M#@o#T2K:jpr0      Set wshShell = CreateObject("Wscrīpt.Shell")
bYn%l#a0zi'q0   For i=1 to MoveNum51Testing软件测试网CW(a:zd
     wshShell.SendKeys "{DOWN}"   '模拟键盘操作51Testing软件测试网"G/y%p-H~]^
   Next
N ~r-TSBe JBc0     wait 151Testing软件测试网UHL;n+Q'\$j
   wshShell.SendKeys "{ENTER}"     '模拟键盘操作
;~ r ]&b@:|0上述代码在弹出菜单后可以实现向下移动选项,并选择的功能.MoveNum是移动的次数51Testing软件测试网#@P(BH0n*L ?.](P
附: wsh键值表51Testing软件测试网%z|Gcy io
键          参数51Testing软件测试网9y(a!]NTW3p
退格键      {BACKSPACE}、{BS}或{BKSP}
y|2c#L0m"ZsF0BREAK       {BREAK}51Testing软件测试网#M
N!W/Vo6_(qq
CAPS LOCK   {CAPSLOCK}
VY3C&\3zO1t7e0DEL或DELETE{DELETE}或{DEL}

r1j a L T_W0下箭头      {DOWN}51Testing软件测试网N9nFZ'D V0}P
END         {END}
S6vUZ7]\4nQ7`0ENTER       {ENTER}或~51Testing软件测试网0V0|*lGxl
ESC         {ESC}51Testing软件测试网;`["_n
Ge
HOME        {HOME}
-J~1\,Wx ah0INS或INSERT{INSERT}或{INS}51Testing软件测试网*?U3Z[Q zp
左箭头      {LEFT}51Testing软件测试网QV2|DZ
\b&Ij:N'M
NUM LOCK    {NUMLOCK}51Testing软件测试网FX1Vu"d
M@
PAGE DOWN   {PGDN}51Testing软件测试网r5f9DT
k:K\
PAGE UP     {PGUP}
fR|Y+tQB A0PRINT SCREEN{PRTSC}51Testing软件测试网|w{K4L2rz:}^
右箭头      {RIGHT}51Testing软件测试网6U#| D5c0YO:eM
SCROLL LOCK{SCROLLLOCK}51Testing软件测试网 ~%F"j |
OhOo7Rr
TAB         {TAB}51Testing软件测试网A7H b.s7F7\B%P0j
上箭头      {UP}
8TcT4e;BV#]4nV \0F1、F2、F3...{F1}、{F2}、{F3}Q51Testing软件测试网7w;x6`"evi'V

'Ea2zB,l~Fm051Testing软件测试网p
b2Mv?&r"V|
wsh不仅仅是这个功能，只是作为一个引子，有时可以解决很多问题，希望大家多多研究，多多交流。

 

PS:在QTP9.2版中开始支持鼠标右键操作。