B4X

POST application/json HTTPS Request

See more HTTP Examples

Demonstrates how to send an HTTPS POST where the request body and response body both have the application/json Content-Type. Also demonstrates how to add a few custom headers to the request. B4X

Dim success As Boolean = False

'  This requires the Chilkat API to have been previously unlocked.
'  See Global Unlock Sample for sample code

Dim http As ChilkatHttp
http.Initialize("http")

'  Add a few custom headers.
http.SetRequestHeader("Client-ID", "my_client_id")
http.SetRequestHeader("Client-Token", "my_client_token")

http.Accept = "application/json"

Dim url As String = "https://api.fiscallog.eu/sign/v1"
Dim jsonRequestBody As String = "{ .... }"
Dim resp As ChilkatHttpResponse
resp.Initialize
success = http.HttpStr("POST", url, jsonRequestBody, "utf-8", "application/json", resp)
If success = False Then
    Log(http.LastErrorText)
    Return
End If


Log("Response status code = " & resp.StatusCode)
Dim jsonResponseStr As String = resp.BodyStr

Log(jsonResponseStr)