UnCompress Method, ZLib class

Description

Uncompress source data and returns the uncompressed data ByteArray or String.

Syntax

vUnCompress = ZLib.UnCompress (Source as Variant, [OutputType as OutputTypes = otByteArray])

Where	Type	Optional	Default	Description
Source	Variant			Source data to compress. ByteArray or String
OutputType	OutputTypes	yes	otByteArray	Type for the return value. One of ByteArray, Variant ByteArray, String or MultiByte String

Returns

Variant

Returns

This function returns variant containing ByteArray, variant ByteArray, String or MultiByte string.

Examples

ZLib - Accept compressed data on server-side ASP

<%
ReceiveFile()

'Server-side function
'This function accepts and saves uploaded data compressed by the Compress method on the servers ASP
Sub ReceiveFile()
  Dim SourceData, FileName, FileContents, ByteArray
  
  'Test if this is request from our client
  FileName = Request.ServerVariables("HTTP_FILENAME")
  If FileName <> "" Then 'This is a request from our client
    'Read compressed file from the source stream
    SourceData = Request.BinaryRead(Request.TotalBytes)
    
    'Uncompress the source file
    Set ZLib = CreateObject("ScriptUtils.ZLib")
    Set FileContents = ZLib.UnCompress(SourceData)
    
    'Save source file to the destination directory (current directory)
    FileContents.SaveAs Server.MapPath(GetFileName(FileName))
  End If
End Sub

Function GetFileName(FullPath)
  'Returns file name from full path
  Dim Pos
  Pos = InstrRev(FullPath, "\")
  GetFileName = Mid(FullPath, Pos + 1)
End Function
%>

Other links for UnCompress

Methods of ZLib class

Compress, UnCompress

ScriptUtils.ZLib

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

ScriptUtils

Easy to use, hi-performance ASP file upload component with progress bar indicator. Let's you upload multiple files with size up to 2GB to a disk or database along with another form fields. Works with large posts, any character set (including unicode utf-8). Contains one-click multiple files/folders download with on-the-fly compression (Using BinaryWrite/BinaryRead).

      Hi-performance text file logging for ASP/VBScript/VBA applications. Lets you create daily/weekly/monthly log files with variable number of logged values and extra timing and performance info.
       Lets you work with safearray binary data in VBS/JS. It also enables conversion between binary and String data using several code pages. ZLib compress and uncompress functions. Lets you transfer files using compressed stream from a client to server using IE.
      This library also enables calling of some Kernel and Advapi functions (performance, timing, sleep, configuration ...) and enables native work with INI files.

	UnCompress
	Method
	Member of ScriptUtils.ZLib