Open

SUB Open ( Path AS String [ , Level AS Integer ] )

Позволяет вам открыть файл на запись в сжатом формате. Прежде, чем вы используете этот метод, вы должны выбрать подходящий compression driver.

* Level : уровень сжатия, может использоваться значение от Min до значения Max . Если вы не передаете этот параметр, будет использовано значение Default .

..
Dim Cz As New Compress

Cz.Type = "bzlib2"
Cz.Open ( "/home/foo/compressed.bz2",Cz.Max )
PRINT #Cz , "Hello, this is a compressed file,"
PRINT #Cz , "using bzlib2 algorithm. Remember that"
PRINT #Cz , "highest compression level provides"
PRINT #Cz , "a little output file, but requires"
PRINT #Cz , "more CPU time"
CLOSE #Cz
...