Hi
Can anyone help me getting token using this:
curl --location --request POST 'http://api.fzo.org.mk/api/Auth/GetToken' \
--data-raw '<LogIn>
<UserName>farmaceft@fzo.org.mk</UserName>
<Password>P@ssw0rd</Password>
</LogIn>
I am using this code but no success
Dim req As New XMLHTTP60
Dim resp As New DOMDocument60
Dim Sxml As String
Sxml = "<?xml version='1.0' encoding='UTF-8' ?>" & vbNewLine _
& "<LogIn>" & vbNewLine _
& "<UserName>farmaceft@fzo.org.mk</UserName>" & vbNewLine _
& "<Password>P@ssw0rd</Password>" & vbNewLine _
& "</LogIn>" & vbNewLine _
req.Open "POST", "http://api.fzo.org.mk/api/Auth/GetToken", False
req.setRequestHeader "Content-Type", "application/xml"
req.send Sxml
resp.LoadXML req.responseText
resp.Save ("c:/apteka/token.txt")
Can anyone help me getting token using this:
curl --location --request POST 'http://api.fzo.org.mk/api/Auth/GetToken' \
--data-raw '<LogIn>
<UserName>farmaceft@fzo.org.mk</UserName>
<Password>P@ssw0rd</Password>
</LogIn>
I am using this code but no success
Dim req As New XMLHTTP60
Dim resp As New DOMDocument60
Dim Sxml As String
Sxml = "<?xml version='1.0' encoding='UTF-8' ?>" & vbNewLine _
& "<LogIn>" & vbNewLine _
& "<UserName>farmaceft@fzo.org.mk</UserName>" & vbNewLine _
& "<Password>P@ssw0rd</Password>" & vbNewLine _
& "</LogIn>" & vbNewLine _
req.Open "POST", "http://api.fzo.org.mk/api/Auth/GetToken", False
req.setRequestHeader "Content-Type", "application/xml"
req.send Sxml
resp.LoadXML req.responseText
resp.Save ("c:/apteka/token.txt")