REST api POST method

[irade92]

Hi
I am trying to POST some parameters to a server but with no result
Here is my code

Private Sub POST_PRIMER()
Dim XMLHTTP
Dim Rezult As String
Dim ArgumentString
ArgumentString = "prescription_code=oz10763&exemp_from_participation=false&pharmacist_facsimile=913189&drug_fund_code=965421"
Set XMLHTTP = CreateObject("msxml2.xmlhttp.6.0")
XMLHTTP.Open "post", "https://api.zdravstvo.gov.mk/rest/prescriptions/realize", False

XMLHTTP.setRequestHeader "Content-Type", "application/xml"
XMLHTTP.send ArgumentString
result = XMLHTTP.responseText
Set XMLHTTP = Nothing
End Sub

Where I am making mistake?
Please help