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
(VBScript) Generate S3 Signed URLDemonstrates how to generate a pre-signed S3 URL.
Dim fso, outFile Set fso = CreateObject("Scripting.FileSystemObject") Set outFile = fso.CreateTextFile("output.txt", True) ' This example assumes the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. set http = CreateObject("Chilkat_9_5_0.Http") ' Insert your access key here: http.AwsAccessKey = "ABQXXABC83ABCDEFVQXX" ' Insert your secret key here: http.AwsSecretKey = "XXXXYYYYabcdABCD12345678xxxxyyyyzzzz" bucketName = "testbucket" path = "starfish.jpg" set expireTime = CreateObject("Chilkat_9_5_0.CkDateTime") success = expireTime.SetFromCurrentSystemTime() bLocalTime = 0 ' Set the expiration time to 1 hour from the current time. success = expireTime.SetFromUnixTime(bLocalTime,expireTime.GetAsUnixTime(bLocalTime) + 3600) signedUrl = http.S3_GenerateUrl(bucketName,path,expireTime) If (http.LastMethodSuccess <> 1) Then outFile.WriteLine(http.LastErrorText) Else outFile.WriteLine(signedUrl) End If outFile.Close |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.