PureBasic

Create an MHT Archive from a URL into a ZIP

Demonstrates Mht.GetAndZipMHT, which creates MHT output from a live web page and stores it as an entry inside a ZIP archive.

The file paths are relative to the application's current working directory. Absolute paths may also be used. Supply the paths appropriate to your own environment.

Background. An MHT (MHTML) web archive is a single MIME file that bundles an HTML page together with its referenced resources, such as images and style sheets, so the page can be stored or viewed offline as one file. The ZIP is created if it does not already exist; otherwise the entry is added to it.

Chilkat PureBasic Downloads

Download Chilkat for PureBasic

PureBasic

IncludeFile "CkMht.pb"

Procedure ChilkatExample()

    success.i = 0

    mht.i = CkMht::ckCreate()
    If mht.i = 0
        Debug "Failed to create object."
        ProcedureReturn
    EndIf

    ;  The file paths are relative to the application's current working directory.  Absolute paths
    ;  may also be used.  Supply the paths appropriate to your own environment.

    ;  Create MHT output from a live web page and store it as an entry inside a ZIP archive.  The 2nd
    ;  argument is the entry name within the ZIP; the 3rd is the ZIP file path.  The ZIP is created if it
    ;  does not already exist.
    success = CkMht::ckGetAndZipMHT(mht,"https://example-code.com/crumb/index.html","page.mht","qa_output/page.zip")
    If success = 0
        Debug CkMht::ckLastErrorText(mht)
        CkMht::ckDispose(mht)
        ProcedureReturn
    EndIf

    Debug "MHT stored in the ZIP archive."


    CkMht::ckDispose(mht)


    ProcedureReturn
EndProcedure