QTP中對右鍵單擊的解決辦法

　　這幾天寫QTP腳本，發現QTP對右鍵單擊的操作不能識別，經過查找資料總結，可以采用wsh的方式，實現右鍵選擇的操作。wsh是通過模擬鍵盤，向激活窗口發送鍵值實現選擇。

        Window("A").WinListView("B").Click 150, 233, micRightBtn   '右鍵單擊出菜單
        Window("A").WinObject("B").WinMenu("C").Select "新建(W);<Item 3>"     '在彈出菜單中選擇功能功能

        上述代碼在回放時回放不過去,改為

        Window("A").WinListView("B").Click 150, 233, micRightBtn

           Dim wshShell
              Set wshShell = CreateObject("Wscrīpt.Shell")

           For i=1 to MoveNum
             wshShell.SendKeys "{DOWN}"   '模擬鍵盤操作
           Next
             wait 1
           wshShell.SendKeys "{ENTER}"     '模擬鍵盤操作

        上述代碼在彈出菜單后可以實現向下移動選項,并選擇的功能.MoveNum是移動的次數

        附: wsh鍵值表

        鍵                             參數
        退格鍵                     {BACKSPACE}、{BS}或{BKSP}
        BREAK                    {BREAK}
        CAPS LOCK           {CAPSLOCK}
        DEL或DELETE       {DELETE}或{DEL}
        下箭頭                      {DOWN}
        END                         {END}
        ENTER                    {ENTER}或~
        ESC                          {ESC}
        HOME                    {HOME}
        INS或INSERT        {INSERT}或{INS}
        左箭頭                    {LEFT}
        NUM LOCK          {NUMLOCK}
        PAGE DOWN       {PGDN}
        PAGE UP              {PGUP}
        PRINT SCREEN   {PRTSC}
        右箭頭                   {RIGHT}
        SCROLL LOCK    {SCROLLLOCK}
        TAB                       {TAB}
        上箭頭                    {UP}
        F1、F2、F3...{F1}、{F2}、{F3}Q

原文轉自：http://www.anti-gravitydesign.com