![Recuperar dados do Tuleap OpenALM para Excel usando VBA](https://rvso.com/image/1457446/Recuperar%20dados%20do%20Tuleap%20OpenALM%20para%20Excel%20usando%20VBA.png)
Estou tentando acessar o Tuleap Open ALM via REST API.
Usei /api/explorer/
para obter o URL necessário: "https://openalm.mycompany.com/api/v1/users?query=asmith&limit=10"
e obtenho a saída correta:
"[
{
""id"": 12123,
""uri"": ""users/12123"",
""real_name"": ""Alex Smith"",
""username"": ""asmith"",
""ldap_id"": ""asmith"",
""avatar_url"": ""/themes/common/images/avatar_default.png""
}
]"
Mas quando tentei obter artefatos no rastreador, obtive uma saída vazia.
URL: "https://openalm.mycompany.com/api/v1/tracker_reports/7426/artifacts?values=all&limit=50"
Saída:[ ]
Aqui está o meu código:
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
Também estou recebendo uma saída vazia quando tento no /api/explorer/
.
Responder1
possíveis problemas podem ser - autenticação: talvez suas informações de usuário estejam disponíveis publicamente/anonimamente, mas seus artefatos não. - seu relatório não contém artefatos.
Estou um pouco em dúvida sobre sua autenticação básica - você pode tentar colocá-la diretamente no URL e ver se isso faz diferença, ou seja
strURL = "https://asmith:[email protected]/api/v1/users?query=asmith&limit=10"