API Post funktioniert nicht per VBA
25.07.2022 14:55:07
Florian
ich habe mir eine Anbindung an eine API gebaut, die leider nicht funktioniert. Der GET klappt einwandfrei, aber beim POST gibt es Probleme. Die API wirft diesen Fehler zurück:
Symfony\Component\HttpKernel\Exception\MethodNotAllowedHttpException: The GET method is not supported for this route.
Das ist mein Code. Anscheinend macht Excel kein POST sonder ein GET daraus.
Sub POST()
Dim objRequest As Object
Dim strUrl As String
Dim blnAsync As Boolean
Dim strResponse As String
Set objRequest = CreateObject("MSXML2.XMLHTTP")
strUrl = "https://api.meinedomain.de/api/v1/post-test/?name=testname"
blnAsync = True
With objRequest
.Open "POST", strUrl, blnAsync
.SetRequestHeader "Content-Type", "application/json"
.Send
'spin wheels whilst waiting for response
While objRequest.readyState 4
DoEvents
Wend
strResponse = .ResponseText
End With
Debug.Print strResponse
End Sub
Kann jemand helfen?Danke Euch!