(VB.NET) HTTP POST JSON
Demonstrates how to send a JSON POST and get the JSON response. Note: This example requires Chilkat v11.0.0 or greater.
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 New Chilkat.Http
Dim jsonText As String = "{""user"":""doctoravatar@penzance.com"",""forecast"":7,""t"":""vlIj"",""zip"":94089}"
' IMPORTANT: Make sure to change the URL, JSON text,
' and other data items to your own values. The URL used
' in this example will not actually work.
Dim resp As New Chilkat.HttpResponse
success = http.HttpStr("POST","https://json.penzance.org/request",jsonText,"utf-8","application/json",resp)
If (success = False) Then
Debug.WriteLine(http.LastErrorText)
Exit Sub
End If
' Display the JSON response.
Debug.WriteLine(resp.BodyStr)
|