QTP的键盘鼠标录制

、QTP录制键盘操作时，有时需要自己写程序实现。方法如下：

 

Key
 Argument
 
BACKSPACE {BACKSPACE}, {BS}, or {BKSP}
BREAK {BREAK}
CAPS LOCK {CAPSLOCK}
DEL or DELETE {DELETE} or {DEL}
DOWN ARROW {DOWN}
END {END}
ENTER {ENTER} or ~
ESC {ESC}
HELP {HELP}
HOME {HOME}
INS or INSERT {INSERT} or {INS}
LEFT ARROW {LEFT}
NUM LOCK {NUMLOCK}
PAGE DOWN {PGDN}
PAGE UP {PGUP}
PRINT SCREEN {PRTSC}
RIGHT ARROW {RIGHT}
SCROLL LOCK {SCROLLLOCK}
TAB {TAB}
UP ARROW {UP}
F1 {F1}
F2 {F2}
F3 {F3}
F4 {F4}
F5 {F5}
F6 {F6}
F7 {F7}
F8 {F8}
F9 {F9}
F10 {F10}
F11 {F11}
F12 {F12}
F13 {F13}
F14 {F14}
F15 {F15}
F16

{

[
 {F16}

{{}

{[}
 

复合键时，参考一下的：

Key
 Special Character
 
SHIFT +
CTRL ^
ALT

"{x 10}"表示字母x被输入10次
 %
 

2、QTP录制鼠标操作时，有时也是录制不到的。可以写代码如下：

Set devReplay = CreateObject("mercury.devicereplay")
devReplay.MouseClick absx+4,absy+4,2
Set devReplay = Nothing

或者以下方法用的更多：

Set WshShell = CreateObject("Wscript.Shell")
WshShell.SendKeys "{DOWN}"
WshShell.SendKeys "{DOWN}"
WshShell.SendKeys "{DOWN}"
WshShell.SendKeys "{ENTER}"

 

本文来自CSDN博客，转载请标明出处：http://blog.csdn.net/Amy0428/archive/2009/08/20/4466297.aspx