VB.NET
VB.NET
SCIS Health Check
See more SCiS Schools Catalogue Examples
Demonstrates the SCIS (Schools Catalogue Information Service) health check API call.Chilkat VB.NET Downloads
Dim success As Boolean = False
' This example assumes the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.
Dim http As New Chilkat.Http
' Implements the following CURL command:
' curl -i -X GET --url https://api.scisdata.com/checkStatus -H 'Authorization: Basic ****'
' Use the following online tool to generate HTTP code from a CURL command
' Convert a cURL Command to HTTP Source Code
' This causes the "Authorization: Basic ****" to be added to each request.
http.Login = "myLogin"
http.Password = "myPassword"
http.BasicAuth = True
Dim sbResponseBody As New Chilkat.StringBuilder
success = http.QuickGetSb("https://api.scisdata.com/checkStatus",sbResponseBody)
If (success = False) Then
Debug.WriteLine(http.LastErrorText)
Exit Sub
End If
Dim jResp As New Chilkat.JsonObject
jResp.LoadSb(sbResponseBody)
jResp.EmitCompact = False
Debug.WriteLine("Response Body:")
Debug.WriteLine(jResp.Emit())
Dim respStatusCode As Integer = http.LastStatus
Debug.WriteLine("Response Status Code = " & respStatusCode)
If (respStatusCode >= 400) Then
Debug.WriteLine("Response Header:")
Debug.WriteLine(http.LastHeader)
Debug.WriteLine("Failed.")
Exit Sub
End If
' Sample JSON response:
' (Sample code for parsing the JSON response is shown below)
'
' {
' "subscriptionStatus": {
' "messages": [
' "Connection to SCIS API is successful",
' "User has a valid SCIS Data subscription"
' ]
' }
' }