![]() |
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) Google Cloud Storage: Update Object MetadataSee more Google Cloud Storage ExamplesDemonstrates how to update (edit) the metadata associated with an object in a Google Cloud Storage bucket.Note: This example requires Chilkat v11.0.0 or greater. For more information, see https://cloud.google.com/storage/docs/viewing-editing-metadata#edit
LOCAL lnSuccess LOCAL loHttp LOCAL loBdRequestBody LOCAL loResp LOCAL loSbResponseBody LOCAL loJResp LOCAL lnRespStatusCode lnSuccess = 0 * This example assumes the Chilkat API to have been previously unlocked. * See Global Unlock Sample for sample code. loHttp = CreateObject('Chilkat.Http') * Implements the following CURL command: * curl -X PATCH --data-binary @JSON_FILE_NAME \ * -H "Authorization: Bearer OAUTH2_TOKEN" \ * -H "Content-Type: application/json" \ * "https://storage.googleapis.com/storage/v1/b/BUCKET_NAME/o/OBJECT_NAME" * Use the following online tool to generate HTTP code from a CURL command * Convert a cURL Command to HTTP Source Code loBdRequestBody = CreateObject('Chilkat.BinData') lnSuccess = loBdRequestBody.LoadFile("JSON_FILE_PATH") IF (lnSuccess <> 1) THEN ? "Failed to load JSON_FILE_PATH" RELEASE loHttp RELEASE loBdRequestBody CANCEL ENDIF * Adds the "Authorization: Bearer OAUTH2_TOKEN" header. loHttp.AuthToken = "OAUTH2_TOKEN" loResp = CreateObject('Chilkat.HttpResponse') lnSuccess = loHttp.HttpBd("PATCH","https://storage.googleapis.com/storage/v1/b/BUCKET_NAME/o/OBJECT_NAME",loBdRequestBody,"application/json",loResp) IF (lnSuccess = 0) THEN ? loHttp.LastErrorText RELEASE loHttp RELEASE loBdRequestBody RELEASE loResp CANCEL ENDIF loSbResponseBody = CreateObject('Chilkat.StringBuilder') loResp.GetBodySb(loSbResponseBody) loJResp = CreateObject('Chilkat.JsonObject') loJResp.LoadSb(loSbResponseBody) loJResp.EmitCompact = 0 ? "Response Body:" ? loJResp.Emit() lnRespStatusCode = loResp.StatusCode ? "Response Status Code = " + STR(lnRespStatusCode) IF (lnRespStatusCode >= 400) THEN ? "Response Header:" ? loResp.Header ? "Failed." RELEASE loHttp RELEASE loBdRequestBody RELEASE loResp RELEASE loSbResponseBody RELEASE loJResp CANCEL ENDIF RELEASE loHttp RELEASE loBdRequestBody RELEASE loResp RELEASE loSbResponseBody RELEASE loJResp |
© 2000-2025 Chilkat Software, Inc. All Rights Reserved.