Hi ,
I had used a code to connect with ALM , but unable to connect .
it gives an error message "Failed to login"
Dim qcURL As String
Dim qcUser As String
Dim qcPassword As String
Dim qcDomain As String
Dim qcProject As String
Dim tdc As New TDAPIOLELib.tdConnection
On Error GoTo err
qcURL = "XXXXXXXXX"
qcUser = "XXXXX"
qcPassword = "XXXXX"
qcDomain = "RBI_2013"
qcProject = "Q4_Integrated_2013"
Application.StatusBar = "Connecting to Quality Center.. Wait..."
'Set tdc = CreateObject("TDApiOle80.TDConnection")
'Set tdc = CreateObject("TDAPIOLELib.TDConnection")
'Initialise the Quality center connection
tdc.InitConnectionEx qcURL
tdc.login qcUser, qcPassword
tdc.Connect qcDomain, qcProject
'On successfull login display message in Status bar
Application.StatusBar = "........QC Connection is done Successfully"
Exit Sub
err:
'Display the error message in Status bar
Application.StatusBar = err.Description
End Sub
Can you please help me on this
Note : This Code is working for QC but not for ALM