![]() |
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
(DataFlex) UPS OAuth2 Client CredentialsSee more UPS ExamplesGet an OAuth2 access token for the UPS REST API using the client credentials flow (no interactivity with a web browser required).Note: This example requires Chilkat v11.0.0 or greater. For more information, see https://developer.ups.com/api/reference?loc=en_US#tag/OAuthClientCredentials_other
Use ChilkatAx-win32.pkg Procedure Test Boolean iSuccess Handle hoHttp Variant vReq Handle hoReq Variant vResp Handle hoResp Variant vSbResponseBody Handle hoSbResponseBody Handle hoJResp Integer iRespStatusCode String sToken_type String sIssued_at String sClient_id String sAccess_token String sExpires_in String sStatus String sTemp1 Move False To iSuccess // This example assumes the Chilkat API to have been previously unlocked. // See Global Unlock Sample for sample code. Get Create (RefClass(cComChilkatHttp)) To hoHttp If (Not(IsComObjectCreated(hoHttp))) Begin Send CreateComObject of hoHttp End // Implements the following CURL command: // curl -i -X POST \ // -u 2498righ8wr6aihe98rt8rhowirtyw9er6twe80rtywrehrt:nerf254578uh8rgt7y3h57358ouyth387h8h53h6yyh80hh578per9y7u5ruyuy4 \ // https://wwwcie.ups.com/security/v1/oauth/token \ // -H 'Content-Type: application/x-www-form-urlencoded' \ // -H 'x-merchant-id: 7B3027' \ // -d grant_type=client_credentials // Use the following online tool to generate HTTP code from a CURL command // Convert a cURL Command to HTTP Source Code Set ComBasicAuth Of hoHttp To True Set ComLogin Of hoHttp To "2498righ8wr6aihe98rt8rhowirtyw9er6twe80rtywrehrt" Set ComPassword Of hoHttp To "nerf254578uh8rgt7y3h57358ouyth387h8h53h6yyh80hh578per9y7u5ruyuy4" Get Create (RefClass(cComChilkatHttpRequest)) To hoReq If (Not(IsComObjectCreated(hoReq))) Begin Send CreateComObject of hoReq End Send ComAddParam To hoReq "grant_type" "client_credentials" Send ComAddHeader To hoReq "x-merchant-id" "7B3027" Set ComHttpVerb Of hoReq To "POST" Set ComContentType Of hoReq To "application/x-www-form-urlencoded" Get Create (RefClass(cComChilkatHttpResponse)) To hoResp If (Not(IsComObjectCreated(hoResp))) Begin Send CreateComObject of hoResp End Get pvComObject of hoReq to vReq Get pvComObject of hoResp to vResp Get ComHttpReq Of hoHttp "https://wwwcie.ups.com/security/v1/oauth/token" vReq vResp To iSuccess If (iSuccess = False) Begin Get ComLastErrorText Of hoHttp To sTemp1 Showln sTemp1 Procedure_Return End Get Create (RefClass(cComChilkatStringBuilder)) To hoSbResponseBody If (Not(IsComObjectCreated(hoSbResponseBody))) Begin Send CreateComObject of hoSbResponseBody End Get pvComObject of hoSbResponseBody to vSbResponseBody Get ComGetBodySb Of hoResp vSbResponseBody To iSuccess Get Create (RefClass(cComChilkatJsonObject)) To hoJResp If (Not(IsComObjectCreated(hoJResp))) Begin Send CreateComObject of hoJResp End Get pvComObject of hoSbResponseBody to vSbResponseBody Get ComLoadSb Of hoJResp vSbResponseBody To iSuccess Set ComEmitCompact Of hoJResp To False Showln "Response Body:" Get ComEmit Of hoJResp To sTemp1 Showln sTemp1 Get ComStatusCode Of hoResp To iRespStatusCode Showln "Response Status Code = " iRespStatusCode If (iRespStatusCode >= 400) Begin Showln "Response Header:" Get ComHeader Of hoResp To sTemp1 Showln sTemp1 Showln "Failed." Procedure_Return End // Save the OAuth2 access token for other examples to use. Get ComWriteFile Of hoJResp "qa_data/tokens/ups_oauth2_token.json" To iSuccess // If successful, the OAuth2 access token JSON looks like this: // { // "token_type": "Bearer", // "issued_at": "1686911985606", // "client_id": "2498righ8wr6aihe98rt8rhowirtyw9er6twe80rtywrehrt", // "access_token": "eyJraW......R2sbqrY", // "expires_in": "14399", // "status": "approved" // } Get ComStringOf Of hoJResp "token_type" To sToken_type Get ComStringOf Of hoJResp "issued_at" To sIssued_at Get ComStringOf Of hoJResp "client_id" To sClient_id Get ComStringOf Of hoJResp "access_token" To sAccess_token Get ComStringOf Of hoJResp "expires_in" To sExpires_in Get ComStringOf Of hoJResp "status" To sStatus End_Procedure |
© 2000-2025 Chilkat Software, Inc. All Rights Reserved.