![]() |
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
(Visual FoxPro) WaTrend Create InstanceSee more WaTrend ExamplesCreate a new WaTrend Instance ID.Note: This example requires Chilkat v11.0.0 or greater.
LOCAL lnSuccess LOCAL loHttp LOCAL loResp LOCAL loSbResponseBody LOCAL lnRespStatusCode LOCAL loJResp LOCAL lcStatus LOCAL lcInstanceId lnSuccess = 0 * This example assumes the Chilkat API to have been previously unlocked. * See Global Unlock Sample for sample code. loHttp = CreateObject('Chilkat.Http') * Use your actual access token instead of 555555555555555555555555555555 loResp = CreateObject('Chilkat.HttpResponse') lnSuccess = loHttp.HttpNoBody("GET","https://app.watrend.com/api/createinstance.php?access_token=555555555555555555555555555555",loResp) IF (lnSuccess = 0) THEN ? loHttp.LastErrorText RELEASE loHttp RELEASE loResp CANCEL ENDIF loSbResponseBody = CreateObject('Chilkat.StringBuilder') loResp.GetBodySb(loSbResponseBody) lnRespStatusCode = loResp.StatusCode ? "Response Status Code = " + STR(lnRespStatusCode) IF (lnRespStatusCode >= 400) THEN ? "Response Header:" ? loResp.Header ? "Failed." RELEASE loHttp RELEASE loResp RELEASE loSbResponseBody CANCEL ENDIF * Both success and failed responses use 200 status code. * A success response contains this JSON in the response body: * {"status":"success","message":"Instance ID generated successfully","instance_id":"638EE5A76D3AA"} * A failed response will contain something like this: * {"status":"error","message":"Access token does not exist"} ? loResp.BodyStr loJResp = CreateObject('Chilkat.JsonObject') loJResp.LoadSb(loSbResponseBody) lcStatus = loJResp.StringOf("status") lcInstanceId = "" IF (loJResp.HasMember("instance_id") = 1) THEN lcInstanceId = loJResp.StringOf("instance_id") ENDIF ? "status: " + lcStatus ? "instance_id: " + lcInstanceId RELEASE loHttp RELEASE loResp RELEASE loSbResponseBody RELEASE loJResp |
© 2000-2025 Chilkat Software, Inc. All Rights Reserved.