Получить данные из Tuleap OpenALM, чтобы преуспеть с помощью VBA

Question

Я пытаюсь получить доступ к Tuleap Open ALM через REST API.

Я использовал /api/explorer/ для получения необходимого URL: " https://openalm.mycompany.com/api/v1/users?query=asmith&limit=10 "

и я получаю правильный вывод:

"[
  {
    ""id"": 12123,
    ""uri"": ""users/12123"",
    ""real_name"": ""Alex Smith"",
    ""username"": ""asmith"",
    ""ldap_id"": ""asmith"",
    ""avatar_url"": ""/themes/common/images/avatar_default.png""
  }
]"

Но когда я пытался получить артефакты в трекере, я получаю пустой вывод.

URL: " https://openalm.mycompany.com/api/v1/tracker_reports/7426/artifacts?values=all&limit=50 "

Выход: [ ]

Вот мой код:

Sub GetDataFromTuleapOpenALM()
    Set objHTTP = CreateObject("MSXML2.XMLHTTP")

    myxml2 = "<platform>" & _
                "<login>" & _
                  "<userName>asmith</userName>" & _
                  "<password>getmein</password>" & _
                "</login>" & _
              "</platform>"

    strURL = "https://openalm.mycompany.com/api/v1/users?query=asmith&limit=10"
    'strURL = "https://openalm.mycompany.com/api/v1/tracker_reports/7426/artifacts?values=all&limit=50"

    objHTTP.Open "GET", strURL, myxml2
    objHTTP.setRequestHeader "Content-Type", "application/xml"
    objHTTP.send
    result = objHTTP.ResponseText
    Debug.Print (result)
End Sub

Я получаю пустой вывод также, когда я пытаюсь сделать это в /api/explorer/ .

Answer 1

Возможные проблемы могут быть - аутентификация: возможно, информация о вашем пользователе общедоступна / анонимно доступна, а ваши артефакты - нет. - в вашем отчете нет артефактов.

Я немного сомневаюсь в вашей базовой аутентификации - вы можете попробовать поместить ее непосредственно в URL и посмотреть, если это имеет значение, т.е.

strURL = "https://asmith:getmein@openalm.mycompany.com/api/v1/users?query=asmith&limit=10"