无法使用 vb 宏连接到 ALM 12.5答案

【问题标题】：Unable to make a connection to ALM 12.5 using vb macro无法使用 vb 宏连接到 ALM 12.5
【发布时间】：2016-04-13 15:02:04
【问题描述】：

我有 2 个 ALM（11 和 12.5），使用以下代码，我可以连接到 ALM11，但它显示 12.5 ALM 的用户名和密码无效，（用户凭据正确）

Function ALM_Connection(ByRef TDConnection, server, user, pwd)

    On Error Resume Next
    Dim fileArray
    almLogin.connectionMessage.ForeColor = vbBlue
    Set TDConnection = CreateObject("tdconnection")
    sUserName = user
    sPassword = pwd
    If Trim(sUserName) = "" Or Trim(sPassword) = "" Then
        almLogin.connectionMessage.ForeColor = vbRed
        almLogin.connectionMessage.Caption = "Please Enter the data and click on 'Authenticate'"
        ALM_Connection = False
        Exit Function
    End If
    almLogin.connectionMessage.Caption = " Please Wait.. "
    Application.Wait (Now + TimeValue("0:00:02"))
    TDConnection.InitConnectionEx server
    TDConnection.Login sUserName, sPassword

    If (TDConnection.loggedin <> True) Then
        almLogin.connectionMessage.ForeColor = vbRed
        almLogin.connectionMessage.Caption = "Invalid UserName or Password"
        ALM_Connection = False
        Exit Function
    Else
        almLogin.connectionMessage.Caption = "Logged In Successfully"
        ALM_Connection = True
    End If

End Function

感谢任何帮助

【问题讨论】：

12.5 是否使用早期绑定而不是后期绑定/CreateObject？
@Mat's Mug : 你能给我一个关于如何检查的提示吗？
嗯，我认为这与后期/早期绑定没有任何关系。 FWIW，您可以通过在工具/参考菜单中浏览到其库来提前绑定依赖项，然后您可以使用Set connection = New TDConnection 而不是CreateObject。原因我不认为这是因为您正在收到响应（“无效的用户名/密码”是响应），所以事情有效。您是否在任何地方处理运行时错误？这两个版本是否连接到同一个地方？
我会试试的，2 个 ALM 中有 2 个项目，所以不会连接到同一个地方。我的要求是从 4 个不同的 alm 中收集缺陷到 excel，一切都在工作，直到更新到 ALM12.5 :(（3 alm 在版本 11，只有一个在 12.5）

标签： vba excel alm

【解决方案1】：

我一般使用下面的语法来创建OTA对象

设置 TDconnection = CreateObject("tdapiole80.tdconnection")

但是，由于连接和身份验证都包含在“On Error Resume Next”中，因此错误消息可能无法真正反映真正的原因。

所以，这就是我要做的调试。

去掉On Error Resume Next，检查代码是否可以创建TDConnection对象
安装正确版本的 HP ALM 插件。
控制台输出“err.description”以了解真正原因

【讨论】：

【解决方案2】：

正如我从您的代码中看到的那样，在任何情况下，当 TDConnection.loggedin 属性不为 True 时，它都会抛出消息“无效的用户名或密码”，但这可能是由于其他原因，例如错误的 OTAClient.dll 库（它们不向后兼容）。所以一般情况下，您应该在机器上注册您的 ALM 客户端（server_url/qcbin -> 工具 -> 注册客户端），然后再试一次。

如果没有帮助，您可以尝试使用官方文档http://alm-help.saas.hpe.com/en/12.50/api_refs/ota/topic96.html中的示例重写您的代码

【讨论】：

欢迎来到 SO！请尽量避免在您的答案中just链接代码示例。发布链接没有任何问题，但我建议您可以从链接中发布一些相关的sn-ps，以防链接失效。

【解决方案3】：

这个问题是由于项目不可用。还要检查您是否有权访问 v12.5 中的任何一个项目。

谢谢。

【讨论】：