![]() |
Chilkat HOME Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi DLL Go Java Node.js Objective-C PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(Classic ASP) Xero Get Full Set of TenantsCheck the full set of tenants you've been authorized to access Note: This example requires Chilkat v11.0.0 or greater. For more information, see https://developer.xero.com/documentation/oauth2/auth-flow
<html> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8"> </head> <body> <% success = 0 ' This example requires the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. set http = Server.CreateObject("Chilkat.Http") set jsonToken = Server.CreateObject("Chilkat.JsonObject") success = jsonToken.LoadFile("qa_data/tokens/xero-access-token.json") If (success = 0) Then Response.Write "<pre>" & Server.HTMLEncode( jsonToken.LastErrorText) & "</pre>" Response.End End If http.AuthToken = jsonToken.StringOf("access_token") http.Accept = "application/json" set resp = Server.CreateObject("Chilkat.HttpResponse") success = http.HttpNoBody("GET","https://api.xero.com/connections",resp) If (success = 0) Then Response.Write "<pre>" & Server.HTMLEncode( http.LastErrorText) & "</pre>" Response.End End If Response.Write "<pre>" & Server.HTMLEncode( "Response Status Code: " & resp.StatusCode) & "</pre>" set jarr = Server.CreateObject("Chilkat.JsonArray") success = jarr.Load(resp.BodyStr) jarr.EmitCompact = 0 Response.Write "<pre>" & Server.HTMLEncode( jarr.Emit()) & "</pre>" If (resp.StatusCode <> 200) Then Response.Write "<pre>" & Server.HTMLEncode( "Failed.") & "</pre>" Response.End End If ' Sample response ' Use this online tool to generate parsing code from sample JSON: ' Generate Parsing Code from JSON ' [ ' { ' "id": "c869f3b7-6435-4c7e-8cb2-122721b04a69", ' "tenantId": "45e4708e-d862-4111-ab3a-dd8cd03913e1", ' "tenantType": "ORGANISATION", ' "createdDateUtc": "2020-02-02T19:17:58.1117990", ' "updatedDateUtc": "2020-02-02T19:17:58.1117990" ' }, ' { ' "id": "74305bf3-12e0-45e2-8dc8-e3ec73e3b1f9", ' "tenantId": "c3d5e782-2153-4cda-bdb4-cec791ceb90d", ' "tenantType": "ORGANISATION", ' "createdDateUtc": "2020-01-30T01:33:36.2717380", ' "updatedDateUtc": "2020-02-02T19:21:08.5739590" ' } ' ] i = 0 count_i = jarr.Size Do While i < count_i ' json is a Chilkat.JsonObject Set json = jarr.ObjectAt(i) id = json.StringOf("id") tenantId = json.StringOf("tenantId") tenantType = json.StringOf("tenantType") createdDateUtc = json.StringOf("createdDateUtc") updatedDateUtc = json.StringOf("updatedDateUtc") i = i + 1 Loop %> </body> </html> |
© 2000-2025 Chilkat Software, Inc. All Rights Reserved.