ActiveX component can't create object: 'TDApiOle80.TDConnection'

问题

I am trying to connect to QCServer using Excel Macro. I am using a 64-bit operating system with following being done:

Register OTAClient.dll
Installed HP ALM Connectivity tool
Added OTA Library to reference

I am getting the following error:

ActiveX component can't create object: 'TDApiOle80.TDConnection'

But the same is running using VBScript:

C:\Windows\SysWOW64\Wscript.exe "C:\Users****\Desktop\qcConn.vbs"

回答1:

I have found this solution on some other blog:

If you are on 64 bit machine, by default your script will run with the 64 bit version of wscript.exe. But QC is a 32 bit app, so you need to consume it from a 32 bit version of wscript.exe which is located at c:\Windows\SysWOW64\wscript.exe.

So what can be done to run it, call command line prompt in your macro and run your command:

C:\Windows\SysWOW64\Wscript.exe 

C:\Users****\Desktop\qcConn.vbs

which will call that vbs. Eg:

Dim goWS: Set goWS = CreateObject("WScript.Shell")    
sCmd = "C:\Windows\SysWOW64\Wscript.exe "C:\Users****\Desktop\qcConn.vbs"""" 
Set oExec = goWS.Exec(sCmd)

Hope this helps !!

回答2:

This is due to the COM objects issue, you need to create few Key's in Registry to run it without issues.

1) Locate your COM object (TDAPIOLE80) GUID under the HKey_Classes_Root\Wow6432Node\CLSID[GUID] Once located (in the parent folder) add a new REG_SZ (string) Value. Name should be AppID and data should be the same COM object GUID (Along with {}) you have just searched for.

2) Add a new key under HKey_Classes_Root\Wow6432Node\AppID\, the new key should be called the same as the com object GUID (Along with {})

3) Under the new key you just added, add a new string (REG_SZ) Value, and call it DllSurrogate, Leave the value empty

4) Create a new Key under HKey_Local_Machine\Software\Classes\AppID\ , Again the new key should be called the same as the COM object’s GUID (Along with {}). No values are necessary to be added under this key.

With this you should be good!!

Cheers!!