我试图通过excel中的vbscript连接到HPQC。我已经将OTA库添加到参考。Excel中的TDConnection VBA
当我试图实例化一个对象作为TDConnection,
全球贸易发展局作为TDConnection
设置TDC =新TDConnection
它抛出一个错误:
运行时错误'429': ActiveX组件无法创建对象。
我用下面的代码来检查:
Sub Connect()
Dim tdc as TDConnection
Dim url as String
Dim Domain as String
Dim Project as String
Dim username as String
Dim Password as String
url = "http://qc.abcdef.com"
Domain = "NNNN"
Project = "NNNNNNN"
username = "ABCD"
Pasword = "XYZ"
Disconnect 'Disconnects any open connections
If (tdc Is Nothing) Then Set tdc = New TDConnection
If (tdc Is Nothing) Then GoTo ConnectionErr
tdc.InitConnectionEx url 'Initiate Connection
tdc.Login username, Password
tdc.Connect Domain, Project
MsgBox "Connection Established"
Exit Sub
ConnectionErr:
MsgBox "Connection Error"
End Sub
然后从CMD下面的命令
C:\Windows\SysWOW64> wscript.exe "C:\...\QC.vbs"
跑去请帮帮忙!
你想使用VBScript,还是使用VBA?从我在wikipedia上可以看到的内容来看,VBScript不支持标注变量'As',这就是为什么它给出了一个指向“As”中的“A”的错误。 – YowE3K