VBA kode til API
Jeg skal lave en opkobling til DanDomain via REST API, og har fået det til at virke i Postman. Men jeg kan ikke få det til at virke via VBA. Min kode er flg.:Public Sub ReadXML()
Dim reader As New XMLHTTP60
Dim strBody As String
'strBody = "user:admin,password:12345678"j - denne virker heller ikke...
strBody = "{ " & Chr(34) & "user" & Chr(34) & ":" & Chr(34) & "admin" & Chr(34) & ", " & Chr(34) & "password" & Chr(34) & ":" & Chr(34) & "12345678" & Chr(34) & " }"
With reader
.Open "POST", "http://brinkland-shop.net/admin/modules/importexport/import_v6.aspx?file=productupdate.xml", False
.setRequestHeader "Content-Type", "Form-data"
.send strBody
End With
Der er mere kode, men det her giver en tilbagemelding 500.
Er der en VBA ekspert der kan omforme Postman til VBA?
