↘ 罒人生就像┈盤棋.。伱永遠5知下⒈步dě.對與錯-℡但伱必須赱下去ˇ◎~

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

上一篇 / 下一篇  2007-12-27 11:18:41 / 个人分类: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


wsh不仅仅是这个功能,只是作为一个引子,有时可以解决很多问题,希望大家多多研究,多多交流。

TAG: QTP

 

评分:0

我来说两句

我的栏目

日历

« 2024-04-26  
 123456
78910111213
14151617181920
21222324252627
282930    

数据统计

  • 访问量: 3931
  • 日志数: 7
  • 建立时间: 2007-10-11
  • 更新时间: 2007-12-27

RSS订阅

Open Toolbar