Compress.File (gb.compress)
Sub File ( Source As String, Target As String [ , Level As Integer ] )
Uma vez selecionado o driver de compressão, você pode comprimir um arquivo e colocar o resultado em outro arquivo usando este método.
-
Source: caminho do arquivo de origem (arquivo a ser comprimido).
-
Target: caminho do arquivo alvo (arquivo comprimido). Se esse arquivo já existe, ele será sobrescrito.
-
Level: nível de compressão, pode ser um valor entre mín ? até o valor Max. Se você não quiser passar este parâmetro, o valor padrão será usado.
Examples
...
Dim Cp As New Compress
Cp.Type = "zlib"
Cp.File("/home/foo/README.TXT" , "/home/foo/README.TXT.gz" , Cp.Max)
...