Estou tentando conectar o excel ao ALM 12.21 usando o código de macro abaixo. Mas sempre que o código falha na etapa de logon e gera uma mensagem de erro informando "Falha no logon", independentemente de fornecer o nome de usuário e a senha corretos. Alguém pode me ajudar a resolver isso e estou tentando me conectar ao 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
Respostas:
0 para resposta № 1Isso pode ocorrer porque o suplemento ALM Connectivity não está instalado / versão incorreta.
- Navegar para http://hp-alm.123.com/qcbin
- Clique em Addons
- Instalar o suplemento de conectividade do ALM
Além disso, quando você estiver criando a integração pela primeira vez, não envolva seu código em On Error Resume Next, que suprime todos os erros e pode ser difícil depurar a causa real do problema.