.bz2 Compress Memory to File

Compress in-memory data to a .bz2 file.

Download Chilkat .NET for 4.0 Framework

Download Chilkat .NET for 64-bit 4.0 Framework (x64)

Download Chilkat .NET for 2.0 / 3.5 Framework

Download Chilkat .NET for 64-bit 2.0 / 3.5 Framework (x64)

Download Chilkat .NET for 1.0 / 1.1 Framework

Dim bz2 As New Chilkat.Bz2()

Dim success As Boolean

'  Any string unlocks the component for the 1st 30-days.
success = bz2.UnlockComponent("Anything for 30-day trial.")
If (success <> true) Then
    MsgBox(bz2.LastErrorText)
    Exit Sub
End If


Dim dataToCompress() As Byte

dataToCompress = System.IO.File.ReadAllBytes("hamlet.xml")


success = bz2.CompressMemToFile(dataToCompress,"hamlet.xml.bz2")
If (success <> true) Then
    MsgBox(bz2.LastErrorText)
    Exit Sub
End If


MsgBox("Success!")