qtp - qtp中的录制输入按钮

Question

如何记录我们在 QTP 中通过键盘为应用程序使用的 ENTER 按钮

Answer 1

我假设您想重播一个Enter键，在大多数情况下，当 QTP 不记录操作时，手动添加步骤比尝试强制 QTP 记录要好得多。

如果有问题的测试对象支持Type您可以使用它：

Window("Calc").Type micReturn

否则，您可以使用本文DeviceReplay中描述的对象

Set dr = CreateObject("Mercury.DeviceReplay")
dr.PressKey 28 ' 28 = Return (Enter)

Answer 2

重播 Enter 按钮按下的另一个选项是简单地使用 Windows 脚本宿主对象的 SendKeys 方法。代码看起来像这样：

Dim WshShell
Set WshShell = CreateObject("WShell.script")
WshShell.SendKeys "{ENTER}"
Set WshShell = Nothing