#excel #vba #alm
Вопрос:
я пытаюсь автоматизировать процесс входа в систему HP ALM Excel Addin mapping.
до сих пор у меня был этот код для входа в систему:
Dim qcURL As String
Dim qcID As String
Dim qcPWD As String
Dim qcDomain As String
Dim qcProject As String
Dim tdConnection As Object
qcURL = "url" 'Example : https://<server url>/qcbin
qcID = "user"
qcPWD = "pw"
qcDomain = "domain"
qcProject = "project"
'Display a message in Status bar
application.StatusBar = "Connecting to Quality Center.. Wait..."
' Create a Connection object to connect to Quality Center
Set tdConnection = CreateObject("TDApiOle80.TDConnection")
'Initialise the Quality center connection
tdConnection.InitConnectionEx qcURL
'Authenticating with username and password
tdConnection.Login qcID, qcPWD
'connecting to the domain and project
tdConnection.Connect qcDomain, qcProject
'On successfull login display message in Status bar
application.StatusBar = "........QC Connection is done Successfully"
но я получаю эту ошибку:
ошибка во время выполнения: компонент ActiveX не может создать объект: ‘TDApiOle80.TDConnection’
Ответ №1:
Вам необходимо установить средство подключения ALM, которое вы можете загрузить с вашего сервера ALM: http(ы):///qcbin/PlugIns/TDConnectivity/TDConnect.exe