HTTP GET with Custom Header and OAuth2 Bearer Token

Local $bSuccess = False

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

$oHttp = ObjCreate("Chilkat.Http")

; Setting the AuthToken property causes the "Authorization: Bearer <token>" header to be adeded.
$oHttp.AuthToken = "Just_the_access_token_here"

; Add one or more custom headers..
$oHttp.SetRequestHeader "X-Tenant-ID","value goes here"
$oHttp.SetRequestHeader "blah-blah-blah","value goes here"

Local $sUrl = "https://www.example.com/abc/123?x=something&y=someOtherThing"

; Send the GET request and get the response body in the StringBuilder object.
$oSb = ObjCreate("Chilkat.StringBuilder")
$bSuccess = $oHttp.QuickGetSb($sUrl,$oSb)
If ($bSuccess <> True) Then
    ConsoleWrite($oHttp.LastErrorText & @CRLF)
    Exit
EndIf

ConsoleWrite("response status code: " & $oHttp.LastStatus & @CRLF)
ConsoleWrite("response body:" & @CRLF)
ConsoleWrite($oSb.GetAsString() & @CRLF)

; If the response contains JSON, you can load it into a Chilkat JSON object...
$oJson = ObjCreate("Chilkat.JsonObject")
$oJson.LoadSb($oSb)
$oJson.EmitCompact = False
ConsoleWrite($oJson.Emit() & @CRLF)