ASP Examples

ChilkatHOMEASPVisual BasicVB.NETC#Visual C++DelphiFoxProJavaPerlPythonRubySQL ServerVBScript

ASP Examples

ASP String
ASP Byte Array
Bounced Mail
Character Encoding
Digital Certificates
Digital Signatures
Email
FTP
HTML-to-XML
HTTP
IMAP
Encryption
MHT / HTML Email
S/MIME
Socket
Spider
RSA Encryption
Tar
Upload
XML
XMP
Zip Compression

More Examples...
Email Object
POP3
SMTP
RSS
Atom
Self-Extractor

Unreleased...
Service
PPMD
Deflate
Bzip2
LZW
Bz2
DH Key Exchange
DSA
Icon

 

 

 

 

 

 

Deflate File

Demonstrates how to use the Deflate compression algorithm to compress a file. (The deflate compression algorithm is the most commonly used in the Zip archive file format.)

This code is capable of compressing any size file because the file data is compressed from input to output in a streaming mode. The output file contains only the deflated data (it is not a .zip, and there is no file structure or format).

Download the Chilkat Compression ActiveX here: ChilkatCompression.zip
Unzip and register the DLL with regsvr32. (This is a pre-release)

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
set compress = Server.CreateObject("Chilkat.Compression")

'  Any string argument automatically begins a 30-day trial.
success = compress.UnlockComponent("30-day trial")
If (success <> 1) Then
    Response.Write "Compression component unlock failed" & "<br>"

End If

compress.Algorithm = "deflate"

'  Deflate this XML file:
success = compress.CompressFile("hamlet.xml","hamletDeflate.dat")
If (success <> 1) Then
    Response.Write compress.LastErrorText & "<br>"

End If

'  Inflate back to the original:
success = compress.DecompressFile("hamletDeflate.dat","hamletInflated.xml")
If (success <> 1) Then
    Response.Write compress.LastErrorText & "<br>"

End If

Response.Write Server.HTMLEncode( "Success!") & "<br>"
%>
</body>
</html>

 

Need a specific example? Send a request to support@chilkatsoft.com

© 2000-2008 Chilkat Software, Inc. All Rights Reserved.