Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(Lianja) Google Drive Refresh Access TokenDemonstrates how to automatically refresh the access token when it expires.
llSuccess = .T. // It requires the Chilkat API to have been previously unlocked. // See Global Unlock Sample for sample code. // This example uses a previously obtained access token having permission for the // Google Drive scope. // The access token (and refresh token) was previously saved to a JSON file with this format: // See Get Google Drive OAuth2 Access Token // { // "access_token": "ya29.Gls-BsdxTWuenChv ... yzVIrXikkLxu5T6dy4I6GjADFardoz4Lruw", // "expires_in": 3600, // "refresh_token": "1/tMBJ ... 27D-Hk6rpQYBA", // "scope": "https://www.googleapis.com/auth/drive", // "token_type": "Bearer" // } loJson = createobject("CkJsonObject") lcTokenFilePath = "qa_data/tokens/googleDrive.json" loJson.LoadFile(lcTokenFilePath) loOauth2 = createobject("CkOAuth2") loOauth2.AccessToken = loJson.StringOf("access_token") loOauth2.RefreshToken = loJson.StringOf("refresh_token") loRest = createobject("CkRest") // Connect using TLS. llBAutoReconnect = .T. llSuccess = loRest.Connect("www.googleapis.com",443,.T.,llBAutoReconnect) // Provide the authentication credentials (i.e. the access token) loRest.SetAuthOAuth2(loOauth2) // We'll test with a simple request to empty trash. // If our access token expired, we'll get a 401 response.. lcJsonResponse = loRest.FullRequestNoBody("DELETE","/drive/v3/files/trash") if (loRest.LastMethodSuccess <> .T.) then ? loRest.LastErrorText release loJson release loOauth2 release loRest return endif // If the access token expired, we'll get a 401 response status with this response body: // { // "error": { // "errors": [ // { // "domain": "global", // "reason": "authError", // "message": "Invalid Credentials", // "locationType": "header", // "location": "Authorization" // } // ], // "code": 401, // "message": "Invalid Credentials" // } // } if (loRest.ResponseStatusCode = 401) then ? "Refreshing access token..." loOauth2.AuthorizationEndpoint = "https://accounts.google.com/o/oauth2/v2/auth" loOauth2.TokenEndpoint = "https://www.googleapis.com/oauth2/v4/token" // Replace these with actual values. loOauth2.ClientId = "GOOGLE-CLIENT-ID" loOauth2.ClientSecret = "GOOGLE-CLIENT-SECRET" loOauth2.Scope = "https://www.googleapis.com/auth/drive" // Use OAuth2 to refresh the access token. llSuccess = loOauth2.RefreshAccessToken() if (llSuccess <> .T.) then ? loOauth2.LastErrorText release loJson release loOauth2 release loRest return endif // Save the new access token to our XML file (so we can refresh it again when needed). loJson.UpdateString("access_token",loOauth2.AccessToken) loFac = createobject("CkFileAccess") loFac.WriteEntireTextFile(lcTokenFilePath,loJson.Emit(),"utf-8",.F.) ? "Access Token Refreshed!" // Retry the request with the new access token.. lcJsonResponse = loRest.FullRequestNoBody("DELETE","/drive/v3/files/trash") if (loRest.LastMethodSuccess <> .T.) then ? loRest.LastErrorText release loJson release loOauth2 release loRest release loFac return endif endif // A successful response will have a status code equal to 204 and the response body is empty. // (If not successful, then there should be a JSON response body with information..) if (loRest.ResponseStatusCode <> 204) then ? "response status code = " + str(loRest.ResponseStatusCode) ? "response status text = " + loRest.ResponseStatusText ? "response header: " + loRest.ResponseHeader ? "response JSON: " + lcJsonResponse release loJson release loOauth2 release loRest release loFac return endif ? "Trash Emptied!" release loJson release loOauth2 release loRest release loFac |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.