【发布时间】:2016-07-10 17:52:20
【问题描述】:
我正在尝试将 Excel 连接到 ALM 12.21。
无论提供正确的用户名和密码,代码在登录步骤都失败并抛出一条错误消息,指出“登录失败”。
我正在尝试连接到 HP ALM 12.2x
Sub ConnectToQC()
Dim sUserName = <Username>
Dim sPassword = <pwd>
Dim QCConnection
Set QCConnection = CreateObject("TDEApiOle80.TDConnection")
QCConnection.InitConnectionEx "http://hp-alm.123.com/qcbin"
QCConnection.Login sUserName, sPassword
**If(QCConnection.LoggedIn <> True) Then**
**MsgBox Err.Description**
End
End If
'<Rest of the Code...>
End Sub
【问题讨论】: