QTP无法创建ActiveX对象

Question

在处理脚本时，我遇到了这个问题。

我无法发布整个代码，但这是一个与我自己写的相同的示例;

Dim qtpApp
Set qtpApp = createObject("QuickTest.Application")
qtpApp.Launch

我也试过这个：

Set qtpApp = createObject("QuickTest.application")

而且这个：

Set qtpApp = createObject("Quick Test.Application")

但我继续获取“Active X Component无法创建对象。在第x行：”设置qtpApp = createObject（“QuickTest.Application”）“

任何帮助表示赞赏。感谢。

Answer 1

正确的prog-id是您首先尝试的"QuickTest.Application"。

可能的原因是您的计算机上未正确安装QTP。 验证是否是这种情况

1. 尝试手动启动QTP
2. 检查注册表HKEY_CLASSES_ROOT\QuickTest.Application\CLSID
中是否存在以下密钥
3. 从注册表中获取classid并检查其中的密钥是否存在于HKEY_CLASSES_ROOT\CLSID下（或者如果它是64位计算机HKEY_CLASSES_ROOT\Wow6432Node\CLSID）
4. 验证在此密钥下，LocalServer32指向QTP的bin目录下的“QtpAutomationAgent.exe”