This example shows you how to decompress (with zlib) and decrypt a file, and then save the new data to a Bitmap file. To try the example, copy the code to your module, and call the DecompressAndDecryptBitmap subroutine in your module. Then run the example.
Private Sub DecompressAndDecryptBitmap _
(bFileName As String, nFileName As String, sKey As String)
Dim BMU As VWBitmapUtils.BitmapUtils
'Initialize the BitmapUtils object.
Set BMU = New VWBitmapUtils.BitmapUtils
'Load the file into memory.
Call BMU.LoadByteData(bFileName)
'Decrypt the byte data.
Call BMU.DecryptByteData(sKey)
'Decompress the byte data.
BMU.DecompressByteData_ZLib
'Save the Bitmap to the new file.
Call BMU.SaveByteData(nFileName)
End Sub