HB_ZIPFILE()
Create a zip file
- Syntax
- HB_ZIPFILE( <cFile> , <cFileToCompress> | <aFiles>, <nLevel> ,
- <bBlock>,<lOverWrite> ) ---> lCompress
- Arguments
- <cFile> Name of the zip file
- <cFileToCompress> Name of a file to Compress ,Drive and/or path can be used
- <aFiles> An array containing files to compress,Drive and/or path can be used
- <nLevel> Compression level ranging from 0 to 9
- <bBlock> Code block to execute while compressing
- <lOverWrite> Toggle to overwite the file if exists
- Returns
- <lCompress> .T. if file was create,otherwise .f.
- Description
- This function create a zip file named . If the extension is ommited , .ZIP will be assumed. If the second parameter is a character string, this file will be added to the zip file.If the second parameter is an array,all files names contained in will be compressed.
- If is used, it detemines the compression type where 0 means No compression and 9 means best compression.
- If is used, every time the file is opened to compress it will do the action specified.
- If is used , it toggles to overwrite or not the existing file.Default is to overwrite the file.
- Examples
- FUNCTION MAIN()
- IF HB_ZIPFILE( "TEST.ZIP","TEST.PRG")
- qout("File was successly create")
- ENDIF
- IF HB_ZIPFILE( "TEST1.ZIP",{"TEST.PRG","c:\windows\win.ini"})
- qout("File was successly create")
- ENDIF
- IF HB_ZIPFILE( "TEST2.ZIP",{"TEST.PRG","c:\windows\win.ini"},8,{|cFile|,qout(cFile)})
- qout("File was successly create")
- ENDIF
- Return Nil
- Status
Ready
- Compliance
- This function is a Harbour extension
- Platforms
- Win32
- Files
- Library is zlib.lib and zlib_bor.lib For Borland Compilers Library is zlib.lib zlib_ms.lib for MSVC compilers