P
Peter Judge
Guest
Here is a rough transcription from one of the MSDN examples. The syntax is quite close: the big changes are the line terminators (. Instead of
and the method/function indicators
intead of .). using System.*. using System.IO.*. using System.IO.Compression.*. def var originalFileStream as FileStream . def var compressedFileStream as FileStream. def var compressionStream as DeflateStream. file-info : file-name = 'TestURI.log' . originalFileStream = File :OpenRead( file-info : full-pathname ). message originalFileStream: length . compressedFileStream = File : Create ( session : temp-dir + "testuri.cmp" ). compressionStream = new DeflateStream(compressedFileStream, CompressionMode:Compress). originalFileStream:CopyTo(compressionStream). compressionStream
ispose(). message 'done ' .
Continue reading...
Continue reading...