|
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
(Visual FoxPro) Google Sheets - Update (Set Values in a Range)Sets values in a range of a spreadsheet. This example will demonstrate by first getting a range, then changing some values in the JSON, and then HTTPS PUT the changes back to the Google Sheet. Note: This example requires Chilkat v9.5.0.76 or greater.
LOCAL loJsonToken LOCAL lnSuccess LOCAL loHttp LOCAL lcJsonResponse LOCAL loJson LOCAL lcUrlToUpdate LOCAL lcXyz LOCAL loResp * This example 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 Sheets scope. * In this example, Get Google Sheets OAuth2 Access Token, the access * token was saved to a JSON file. This example fetches the access token from the file.. * For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.JsonObject') loJsonToken = CreateObject('Chilkat.JsonObject') lnSuccess = loJsonToken.LoadFile("qa_data/tokens/googleSheets.json") IF (loJsonToken.HasMember("access_token") = 0) THEN ? "No access token found." RELEASE loJsonToken CANCEL ENDIF * For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.Http') loHttp = CreateObject('Chilkat.Http') loHttp.AuthToken = loJsonToken.StringOf("access_token") * First get the cells in the range A1:B5 loHttp.SetUrlVar("range","Sheet1!A1:B5") loHttp.SetUrlVar("spreadsheetId","1_SO2L-Y6nCayNpNppJLF0r9yHB2UnaCleGCKeE4O0SA") lcJsonResponse = loHttp.QuickGetStr("https://sheets.googleapis.com/v4/spreadsheets/{$spreadsheetId}/values/{$range}") IF (loHttp.LastMethodSuccess <> 1) THEN ? loHttp.LastErrorText RELEASE loJsonToken RELEASE loHttp CANCEL ENDIF ? lcJsonResponse * For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.JsonObject') loJson = CreateObject('Chilkat.JsonObject') loJson.EmitCompact = 0 loJson.Load(lcJsonResponse) * A sample response is shown below. * { * "range": "Sheet1!A1:B5", * "majorDimension": "ROWS", * "values": [ * [ * "Item", * "Cost" * ], * [ * "Wheel", * "$20.50" * ], * [ * "Door", * "$15" * ], * [ * "Engine", * "$100" * ], * [ * "Totals", * "$135.50" * ] * ] * } * We're going to change the cost of the Engine to $120, and the Totals to $155.50 loJson.I = 3 loJson.J = 1 loJson.UpdateString("values[i][j]","$120") loJson.I = 4 loJson.UpdateString("values[i][j]","$155.50") * Show the updated JSON. ? loJson.Emit() * -------------------------------------------------------- * Note: This example requires Chilkat v9.5.0.76 or greater. * -------------------------------------------------------- * Update the Google Sheet using a PUT request. loJson.EmitCompact = 1 lcUrlToUpdate = "https://sheets.googleapis.com/v4/spreadsheets/{$spreadsheetId}/values/{$range}?valueInputOption=USER_ENTERED" lcXyz = loHttp.QuickGetStr(lcUrlToUpdate) loResp = loHttp.PText("PUT",lcUrlToUpdate,loJson.Emit(),"utf-8","application/json",0,0) IF (loHttp.LastMethodSuccess <> 1) THEN ? loHttp.LastErrorText RELEASE loJsonToken RELEASE loHttp RELEASE loJson CANCEL ENDIF * Examine the response.. ? "response status code = " + STR(loResp.StatusCode) ? "response body:" ? loResp.BodyStr * A sample response body: * { * "spreadsheetId": "1_SO2L-Y6nCayNpNppJLF0r9yHB2UnaCleGCKeE4O0SA", * "updatedRange": "Sheet1!A1:B5", * "updatedRows": 5, * "updatedColumns": 2, * "updatedCells": 10 * } RELEASE loResp RELEASE loJsonToken RELEASE loHttp RELEASE loJson |
||||
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.