UnZipOpen

Previous  Top  Next

Sintaxis:

UnZipOpen( <cNombre> ) -> nManejador

Argumentos:

<cNombre> es el nombre del archivo zip que se abrirá. Si el cNombre no contiene una extensión se le agregará '.zip' automáticamente.

Devuelve:

-1 si falló la función o un manejador válido en caso contrario.

   UnZipOpen() abre un archivo zip existente. El valor devuelto es el manejador que se usará en las funciones de listar el contenido (UnZipDirectory), de extraer un archivo (UnZipExtractFile), de extraer todos los archivos (UnZipExtractAll) y de cerrar el archivo zip (UnZipClose).


Ejemplo:

   nHandle := UnZipOpen( "Test" )
   if nHandle != F_ERROR
      // Obtenemos el array de los nombres de los archivos que contiene.
      aFiles := UnZipDirectory( nHandle )

      // Extracción de los archivos uno a uno.
      aEval( aFiles, { | cName | UnZipExtractFile( nHandle, cName ) } )

      // Extracción de todos los archivos.
      UnZipExtractAll( nHandle )

      UnZipClose( nHandle )
   endif