Xojo Plugin

bz2 Compress File

Compress a file to the bz2 file format. Xojo Plugin

Dim success As Boolean
success = False

// This example requires the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.

Dim bz2 As New Chilkat.Bz2

// Compress the file qa_data/hamlet.xml to create qa_output/hamlet.bz2
success = bz2.CompressFile("qa_data/hamlet.xml","qa_output/hamlet.bz2")
If (success <> True) Then
    System.DebugLog(bz2.LastErrorText)
    Return
End If

System.DebugLog("Success.")