DeCompress a ZIP file

x = object.ZIPDeCompressZip

The syntax of the ZIPDeCompressZIP method has these parts:

 

Part	Description
object	A Cryptocx v7 control.
x	A string that becomes either "TRUE" or "Error: xxx" where xxx is the error message.

The properties you can set when de-compressing a ZIP file are:

Required - SourceFile
Required - WorkingFolder

The WorkingFolder property specifies the start folder for decompression to start in.

String

Where Cryptocx is an instance of a Cryptocx Control.

''
'' Extract (De-Compress) the specified ZIP file
''
Dim theResult As String
Dim Cryptocx As New EasyByte_Software.Cryptocxv7


Cryptocx.LicenseKey = "DEMO"

Cryptocx.SourceFile = "C:\somefile.zip"
Cryptocx.WorkingFolder = "C:\"

theResult = Cryptocx.ZIPDeCompressZIP


'' Check to see what has happened (if the de-compression went ok without errors)
''
If theResult = "TRUE" Then
  '' Ok, the zip file was de-compressed with no errors
Else
  MsgBox theResult
End If


'' Free up Memory Resources
''
Set Cryptocx = Nothing