B4X Requires Chilkat v11.0.0+

Get ZIP Directory Information as XML

See more Zip Examples

This example demonstrates how to use the GetDirectoryAsXML method to retrieve information about the contents of a ZIP archive as an XML document.

The returned XML describes the files currently contained in the ZIP object

B4X

Dim success As Boolean = False

'  Open an existing ZIP archive.
Dim zip As ChilkatZip
zip.Initialize("zip")

success = zip.OpenZip("example.zip")
If success = False Then
    Log(zip.LastErrorText)
    Return
End If


'  Get the ZIP directory information as XML.
Dim xml As String = zip.GetDirectoryAsXML

Log(xml)

'  Suppose the ZIP contains:

'  data/config/settings.json
'  docs/readme.txt
'  images/logo.png

'  The XML contains one element for each ZIP entry.
'  Example:
'  
'  <?xml version="1.0" encoding="utf-8"?>
'  <zip_contents>
'      <dir name="data">
'          <dir name="config">
'              <file>settings.json</file>
'          </dir>
'      </dir>
'      <dir name="docs">
'          <file>readme.txt</file>
'      </dir>
'      <dir name="images">
'          <file>logo.png</file>
'      </dir>
'  </zip_contents>

zip.CloseZip

Log("Done.")