(VB.NET UWP/WinRT) Download Full Intake Form in JSON Format
The full intake form is very similar to intake summary object, except it adds an array of questions. For more information, see https://support.intakeq.com/article/31-intakeq-api#download-intake
' This example assumes the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.
Dim http As New Chilkat.Http
' To log the exact HTTP request/response to a session log file:
http.SessionLogFilename = "/someDir/sessionLog.txt"
http.SetRequestHeader("X-Auth-Key","xxxxxxxxxxxxxxxxxxxxxxxxx")
Dim sbJson As New Chilkat.StringBuilder
Dim success As Boolean = Await http.QuickGetSbAsync("https://intakeq.com/api/v1/intakes/[intake-id]",sbJson)
If (success = False) Then
Debug.WriteLine(http.LastErrorText)
Exit Sub
End If
If (http.LastStatus <> 200) Then
Debug.WriteLine("status code: " & http.LastStatus)
Debug.WriteLine("response: " & sbJson.GetAsString())
Exit Sub
End If
Debug.WriteLine("raw response: ")
Debug.WriteLine(sbJson.GetAsString())
Dim json As New Chilkat.JsonObject
json.LoadSb(sbJson)
json.EmitCompact = True
Debug.WriteLine(json.Emit())
|