Chilkat HOME Android™ Classic ASP C C++ C# Mono C# .NET Core C# C# UWP/WinRT DataFlex Delphi ActiveX Delphi DLL Visual FoxPro Java Lianja MFC Objective-C Perl PHP ActiveX PHP Extension PowerBuilder PowerShell PureBasic CkPython Chilkat2-Python Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ Visual Basic 6.0 VB.NET VB.NET UWP/WinRT VBScript Xojo Plugin Node.js Excel Go
(VB.NET UWP/WinRT) Azure Storage: Delete BlobDemonstrates the Azure Delete Blob operation, which marks the specified blob for deletion. The blob is later deleted during garbage collection.
' Azure Blob Service Example: Delete a particular blob in a specified container. ' See also: https://docs.microsoft.com/en-us/rest/api/storageservices/delete-blob ' This example requires the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. Dim rest As New Chilkat.Rest ' Connect to the Azure Storage Blob Service Dim bTls As Boolean = True Dim port As Integer = 443 Dim bAutoReconnect As Boolean = True ' In this example, the storage account name is "chilkat". Dim success As Boolean = Await rest.ConnectAsync("chilkat.blob.core.windows.net",port,bTls,bAutoReconnect) If (success <> True) Then Debug.WriteLine(rest.LastErrorText) Exit Sub End If ' Provide Azure Cloud credentials for the REST call. Dim azAuth As New Chilkat.AuthAzureStorage azAuth.AccessKey = "AZURE_ACCESS_KEY" ' The account name used here should match the 1st part of the domain passed in the call to Connect (above). azAuth.Account = "chilkat" azAuth.Scheme = "SharedKey" azAuth.Service = "Blob" ' This causes the "x-ms-version: 2020-08-04" header to be automatically added. azAuth.XMsVersion = "2020-08-04" success = rest.SetAuthAzureStorage(azAuth) ' Note: The application does not need to explicitly set the following ' headers: x-ms-date, Authorization. These headers ' are automatically set by Chilkat. ' A successful operation returns status code 202 (Accepted) with no response body. ' This example deletes the blob named "helloWorld.txt" located in "mycontainer" Dim responseStr As String = Await rest.FullRequestNoBodyAsync("DELETE","/mycontainer/helloWorld.txt") If (rest.LastMethodSuccess <> True) Then Debug.WriteLine(rest.LastErrorText) Exit Sub End If If (rest.ResponseStatusCode <> 202) Then ' Examine the request/response to see what happened. Debug.WriteLine("response status code = " & rest.ResponseStatusCode) Debug.WriteLine("response status text = " & rest.ResponseStatusText) Debug.WriteLine("response header: " & rest.ResponseHeader) Debug.WriteLine("response body (if any): " & responseStr) Debug.WriteLine("---") Debug.WriteLine("LastRequestStartLine: " & rest.LastRequestStartLine) Debug.WriteLine("LastRequestHeader: " & rest.LastRequestHeader) Exit Sub End If Debug.WriteLine("Successfully deleted the blob!") |
© 2000-2022 Chilkat Software, Inc. All Rights Reserved.