ZLib - Compress file

Sample for ScriptUtils.ZLib.Compress | Changes | Purchase | Download


ZLib - Compress file 
Sub CompressFile(SourceFile, DestFile)
  Dim ByteArray, ZLib
  Set ByteArray = CreateObject("ScriptUtils.ByteArray")
  Set ZLib = CreateObject("ScriptUtils.ZLib")
  'Read the dsource file
  ByteArray.ReadFrom SourceFile

  'Compress source data
  Set ByteArray = ZLib.Compress(ByteArray.ByteArray)

  'Save data to the destination file
  ByteArray.SaveAs DestFile
End Sub

Other links for the ZLib - Compress file sample


Implements zlib Compress and Uncompress functions. Lets you compress/uncompress files, or send compressed data over http/https connections.

This class has Win32/X86 version


Huge ASP upload is easy to use, hi-performance ASP file upload component with progress bar indicator. This component lets you upload multiple files with size up to 4GB to a disk or a database along with another form fields. Huge ASP file upload is a most featured upload component on a market with competitive price and a great performance . The software has also a free version of asp upload with progress, called Pure asp upload , written in plain VBS, without components (so you do not need to install anything on server). This installation package contains also ScriptUtilities library. Script Utilities lets you create hi-performance log files , works with binary data , you can download multiple files with zip/arj compression, work with INI files and much more with the ASP utility.

© 1996 - 2011 Antonin Foller, Motobit Software | About, Contacts | e-mail: info@pstruh.cz

Other Motobit links:   IISTracer, real-time IIS monitor   ASP file upload - upload files to ASP. 
ActiveX/VBSScript registry editor  ActiveX NT User account manager  Export MDB/DBF from ASP Active LogFile  Email export  ActiveX/ASP Scripting Dictionary object