Excel Macro: Le composant ActiveX ne peut pas créer l'objet: 'TDApiOle80.TDConnection'

Question

QcConnection Error

Je suis en train de se connecter à l'aide d'Excel QCServer Macro. J'utilise un système d'exploitation 64 bits avec suivant se fait:

1. Inscrivez-OTAClient.dll
2. installé outil de connectivité HP ALM
3. Ajouté Bibliothèque OTA pour faire référence

Maintenant, après tout cela Je reçois toujours l'erreur suivante:

Le composant ActiveX ne peut pas créer d'objet: 'TDApiOle80.TDConnection'

Mais la même chose est en cours d'exécution en utilisant un script VB:

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

S'il vous plaît AIDEZ-MOI !!

Answer 1

J'ai trouvé cette solution sur un autre blog:

Si vous êtes sur machine 64 bits, par défaut, votre script sera exécuté avec la version 64 bits de wscript.exe. Mais QC est une application 32 bits, vous devez donc le consommer à partir d'une version 32 bits de wscript.exe qui se trouve au c:\Windows\SysWOW64\wscript.exe.

Que peut-on faire pour l'exécuter, dans votre macro et exécuter appel invite de ligne de commande de votre commande:

C:\Windows\SysWOW64\Wscript.exe 

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

qui appellera que VBS. Par exemple:

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

Espérons que cela aide !!