|
Chilkat • HOME • Android™ • AutoIt • C • C# • C++ • Chilkat2-Python • CkPython • Classic ASP • DataFlex • Delphi DLL • Go • Java • Node.js • Objective-C • PHP Extension • Perl • PowerBuilder • PowerShell • PureBasic • Ruby • SQL Server • Swift • Tcl • Unicode C • Unicode C++ • VB.NET • VBScript • Visual Basic 6.0 • Visual FoxPro • Xojo Plugin
PPMD Compress FileDemonstrates how to use the PPMD compression algorithm to compress a file. 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 does not contain any "PPMD" header -- it is purely PPMD compressed data.
<html> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8"> </head> <body> <% set compress = Server.CreateObject("Chilkat_9_5_0.Compression") ' Any string argument automatically begins a 30-day trial. success = compress.UnlockComponent("30-day trial") If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode("Compression component unlock failed") & "</pre>" End If compress.Algorithm = "ppmd" success = compress.CompressFile("hamlet.xml","hamletPpmd.dat") If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode(compress.LastErrorText) & "</pre>" End If ' Decompress back to the original: success = compress.DecompressFile("hamletPpmd.dat","hamletInflated.xml") If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode(compress.LastErrorText) & "</pre>" End If Response.Write "<pre>" & Server.HTMLEncode( "Success!") & "</pre>" %> </body> </html> |
||||
© 2000-2026 Chilkat Software, Inc. All Rights Reserved.