PureBasic

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

PureBasic

IncludeFile "CkZip.pb"

Procedure ChilkatExample()

    success.i = 0

    success = 0

    ; Open an existing ZIP archive.
    zip.i = CkZip::ckCreate()
    If zip.i = 0
        Debug "Failed to create object."
        ProcedureReturn
    EndIf

    success = CkZip::ckOpenZip(zip,"example.zip")
    If success = 0
        Debug CkZip::ckLastErrorText(zip)
        CkZip::ckDispose(zip)
        ProcedureReturn
    EndIf

    ; Get the ZIP directory information as XML.
    xml.s = CkZip::ckGetDirectoryAsXML(zip)

    Debug 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>

    CkZip::ckCloseZip(zip)

    Debug "Done."


    CkZip::ckDispose(zip)


    ProcedureReturn
EndProcedure