在软件测试过程中有关QTP中的DeviceReplay对象的使用的介绍

发表于:2009-06-17来源:作者:点击数: 标签:软件测试qtpQTPDeviceReplay对象
DeviceReplay对象可用于在 软件测试 工具 QTP 中直接操纵鼠标和键盘,例如单击鼠标、发送键盘按键、输入字符串等动作。 下面的脚本首先创建DeviceReplay对象,然后使用其SendString方法发送一段字符串,然后使用MouseMove方法移动鼠标,使用MouseClick方法单
DeviceReplay对象可用于在软件测试工具QTP中直接操纵鼠标和键盘,例如单击鼠标、发送键盘按键、输入字符串等动作。

        下面的脚本首先创建DeviceReplay对象,然后使用其SendString方法发送一段字符串,然后使用MouseMove方法移动鼠标,使用MouseClick方法单击鼠标:

Dim devicereplay

word = \"Hello World!\"

Set devicereplay = CreateObject(\"Mercury.DeviceReplay\")

devicereplay.SendString(word)

devicereplay.MouseMove 200,200

devicereplay.MouseClick 200,200,LEFT_MOUSE_BUTTON

        而下面的脚本将按下“SHIFT”键:
Dim devicereplay
VK_SHIFT = 42
Set devicereplay = CreateObject(\"Mercury.DeviceReplay\")
devicereplay.KeyDown(VK_SHIFT)

原文转自:http://www.ltesting.net