ActiveX组件无法创建对象: Mercury.ObjectRepositoryUtil

Question

我创建了一个VB脚本，它将QTP的对象存储库文件(.tsr)转换为XML，然后再转换为Excel。此Excel文件格式也是通过VB脚本配置的。然而，它工作得很好，我试图在一台新机器上运行它，但我得到了一个错误：

ActiveX组件无法创建对象: Mercury.ObjectRepositoryUtil。

脚本：

Public Function ExportTSRToXML(TSRPath,XMLPath)
Set XMLRepositoryObj = CreateObject("Mercury.ObjectRepositoryUtil")
XMLRepositoryObj.ExportToXML TSRPath, XMLPath
ExportTSRToXML = XMLPath
Set XMLRepositoryObj = Nothing
End Function

以下是我修复此问题的步骤: 1.在REGSVR32中注册RepositoryUtil.dll 2.在SYSWOW64下使用CSCRIPT.exe运行vbscript文件

在上面提到的步骤2中，我在执行脚本时看到错误："Microsoft VBScript运行时错误:无效的过程调用或参数“。

我遗漏了什么？我想不出来。

谢谢你的帮助。同样，这段代码完全可以在多台机器上运行。新机器(64位)具有统一功能工具11.5，而不是QTP 11.0。

Answer 1

尝试使用以下命令行启动脚本：%SystemRoot%\SysWow64\cscript <yourscript-here>。64位计算机自动启动64位解释器，但此com对象与它不兼容