|
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
(Classic ASP) Azure Storage: List BlobsAzure Storage Blob Service REST API: Sample code to fetch the list of blobs in the specified container.
<html> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8"> </head> <body> <% ' Azure Blob Service Example: List the blobs in a specified container. ' See also: https://msdn.microsoft.com/en-us/library/azure/dd135734.aspx ' This example requires the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Rest") set rest = Server.CreateObject("Chilkat.Rest") ' Connect to the Azure Storage Blob Service bTls = 1 port = 443 bAutoReconnect = 1 ' In this example, the storage account name is "chilkat". success = rest.Connect("chilkat.blob.core.windows.net",port,bTls,bAutoReconnect) If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( rest.LastErrorText) & "</pre>" Response.End End If ' Provide Azure Cloud credentials for the REST call. ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.AuthAzureStorage") set azAuth = Server.CreateObject("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: 2021-08-06" header to be automatically added. azAuth.XMsVersion = "2021-08-06" 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. ' The expected success response is a 200 response status code with an XML response body. ' In this example, we are listing the blobs in the container named "mycontainer". responseStr = rest.FullRequestNoBody("GET","/mycontainer?restype=container&comp=list") If (rest.LastMethodSuccess <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( rest.LastErrorText) & "</pre>" Response.End End If ' When successful, the Azure Storage service will respond with a 200 response status code, ' with an XML response body. If (rest.ResponseStatusCode <> 200) Then ' Examine the request/response to see what happened. Response.Write "<pre>" & Server.HTMLEncode( "response status code = " & rest.ResponseStatusCode) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "response status text = " & rest.ResponseStatusText) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "response header: " & rest.ResponseHeader) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "response body (if any): " & responseStr) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "---") & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "LastRequestStartLine: " & rest.LastRequestStartLine) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "LastRequestHeader: " & rest.LastRequestHeader) & "</pre>" Response.End End If ' Load the XML response for parsing. ' An example of the response XML is shown below. ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Xml") set xml = Server.CreateObject("Chilkat.Xml") success = xml.LoadXml(responseStr) Response.Write "<pre>" & Server.HTMLEncode( xml.GetXml()) & "</pre>" ' Let's iterate over the blobs... ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.CkDateTime") set lastMod = Server.CreateObject("Chilkat.CkDateTime") numBlobs = xml.NumChildrenAt("Blobs") i = 0 Do While i < numBlobs Response.Write "<pre>" & Server.HTMLEncode( "---- Blob " & i & " ----") & "</pre>" xml.I = i Response.Write "<pre>" & Server.HTMLEncode( "Name: " & xml.GetChildContent("Blobs|Blob[i]|Name")) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "Content-Length: " & xml.GetChildContent("Blobs|Blob[i]|Properties|Content-Length")) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "Content-Type: " & xml.GetChildContent("Blobs|Blob[i]|Properties|Content-Type")) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "Content-MD5: " & xml.GetChildContent("Blobs|Blob[i]|Properties|Content-MD5")) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "BlobType: " & xml.GetChildContent("Blobs|Blob[i]|Properties|BlobType")) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "LeaseStatus: " & xml.GetChildContent("Blobs|Blob[i]|Properties|LeaseStatus")) & "</pre>" success = lastMod.SetFromRfc822(xml.GetChildContent("Blobs|Blob[i]|Properties|Last-Modified")) ' dt is a Chilkat.DtObj Set dt = lastMod.GetDtObj(1) Response.Write "<pre>" & Server.HTMLEncode( "Last-Modified YMD: " & dt.Year & "," & dt.Month & "," & dt.Day) & "</pre>" i = i + 1 Loop Response.Write "<pre>" & Server.HTMLEncode( "-------------------------") & "</pre>" ' Use the ChilkatPath method to get information for a specific blob: ' For example, let's say we want the Last-Modified date/time for ' the blob named "helloWorld.txt" lastModStr = xml.ChilkatPath("/C/Name,helloWorld.txt|..|Properties|Last-Modified|*") Response.Write "<pre>" & Server.HTMLEncode( "helloWorld.txt Last-Modified: " & lastModStr) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "Success.") & "</pre>" ' <?xml version="1.0" encoding="utf-8" ?> ' <EnumerationResults ServiceEndpoint="https://chilkat.blob.core.windows.net/" ContainerName="test"> ' <Blobs> ' <Blob> ' <Name>hamletC.xml</Name> ' <Properties> ' <Last-Modified>Mon, 02 May 2016 23:50:30 GMT</Last-Modified> ' <Etag>0x8D372E48B6D323A</Etag> ' <Content-Length>279658</Content-Length> ' <Content-Type>application/octet-stream</Content-Type> ' <Content-Encoding /> ' <Content-Language /> ' <Content-MD5>4E6prI9haw81xadSLeEj3Q==</Content-MD5> ' <Cache-Control /> ' <Content-Disposition>attachment; filename="hamletC.xml"</Content-Disposition> ' <BlobType>BlockBlob</BlobType> ' <LeaseStatus>unlocked</LeaseStatus> ' <LeaseState>available</LeaseState> ' </Properties> ' </Blob> ' <Blob> ' <Name>helloWorld.txt</Name> ' <Properties> ' <Last-Modified>Mon, 02 May 2016 15:21:55 GMT</Last-Modified> ' <Etag>0x8D3729D7EE38299</Etag> ' <Content-Length>12</Content-Length> ' <Content-Type>application/octet-stream</Content-Type> ' <Content-Encoding /> ' <Content-Language /> ' <Content-MD5>7Qdih1MuhjZehB6Sv8UNjA==</Content-MD5> ' <Cache-Control /> ' <Content-Disposition>attachment; filename="helloWorld.txt"</Content-Disposition> ' <BlobType>BlockBlob</BlobType> ' <LeaseStatus>unlocked</LeaseStatus> ' <LeaseState>available</LeaseState> ' </Properties> ' </Blob> ' <Blob> ' <Name>thisIsATest.txt</Name> ' <Properties> ' <Last-Modified>Tue, 03 May 2016 00:22:13 GMT</Last-Modified> ' <Etag>0x8D372E8F9B2A62E</Etag> ' <Content-Length>1600</Content-Length> ' <Content-Type>application/octet-stream</Content-Type> ' <Content-Encoding /> ' <Content-Language /> ' <Content-MD5>FhgUXYfePg2ItsraPmz0Xg==</Content-MD5> ' <Cache-Control /> ' <Content-Disposition>attachment; filename="thisIsATest.txt"</Content-Disposition> ' <BlobType>BlockBlob</BlobType> ' <LeaseStatus>unlocked</LeaseStatus> ' <LeaseState>available</LeaseState> ' </Properties> ' </Blob> ' </Blobs> ' <NextMarker /> ' </EnumerationResults> ' %> </body> </html> |
||||
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.