![]() |
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
(VBScript) Backblaze S3 Upload BinarySee more Backblaze S3 ExamplesDemonstrates how to upload the in-memory binary data to an Backblaze bucket.
Dim fso, outFile Set fso = CreateObject("Scripting.FileSystemObject") 'Create a Unicode (utf-16) output text file. Set outFile = fso.CreateTextFile("output.txt", True, True) success = 0 ' This example assumes the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. set http = CreateObject("Chilkat.Http") ' keyID = Access Key ID or Access Key http.AwsAccessKey = "access-key" ' applicationKey = Secret Access Key or Secret Key http.AwsSecretKey = "secret-key" ' Region is the 2nd part of your S3 Endpoint http.AwsEndpoint = "s3.us-west-002.backblazeb2.com" bucketName = "chilkat-test-123" objectName = "starfish.jpg" ' The Content-Type has the form type/subtype, such as application/pdf, application/json, image/jpeg, etc. ' See Explaining Content-Types contentType = "image/jpeg" http.KeepResponseBody = 1 set jpgData = CreateObject("Chilkat.BinData") success = jpgData.LoadFile("qa_data/jpg/starfish.jpg") success = http.S3_UploadBd(jpgData,contentType,bucketName,objectName) If (success <> 1) Then outFile.WriteLine(http.LastErrorText) set xml = CreateObject("Chilkat.Xml") success = xml.LoadXml(http.LastResponseBody) outFile.WriteLine(xml.GetXml()) Else outFile.WriteLine("JPG uploaded.") End If outFile.Close |
© 2000-2025 Chilkat Software, Inc. All Rights Reserved.