VBA - Récupérer ticket via API

[LudovicCh]

Bonjour à tous,

Je souhaite à partir d'Excel (car l'export depuis Mantis n'exporte pas tous les champs et date) récupérer les tickets de mon Mantis via les API / token.
Avec Postman cela fonctionne bien et donc maintenant je souhaite intégré ça dans Excel.

Voilà mon code :

Code: Select all

    Dim test As String
    Dim httpRequest As New MSXML2.ServerXMLHTTP60
    
    Dim result As String
    Const bugtrackerBaseURL As String = "https:/MonURL/api/rest/issues?page_size=10&page=1"
    Const token As String = "MonToken"
    
    ' open connection
    httpRequest.Open "POST", bugtrackerBaseURL, False
    
    ' request settings
    httpRequest.setRequestHeader "Authorization", token
    httpRequest.setRequestHeader "Content-type", "application/json"


    ' send the request
    httpRequest.Send

    ' get the result
    result = httpRequest.ResponseText
    
    MsgBox result

Cela me renvoie toujours une erreur "400 summary not specicied" (voir PJ).

Quelqu'un aurait une idée ? J'ai cherché sur internet et je n'ai pas trouvé de solution ni de cas vraiment similaire (VBA + API token)


Cdlt.

[LudovicCh]

Bon visiblement personne ne sait..

[atrol]

Sorry no French

Code: Select all

    httpRequest.Open "POST", bugtrackerBaseURL, False

Shouldn't this be "GET" instead of "POST"?