Copyright (c) 2012 RCDMK <[email protected]>
Por el presente se otorga permiso, sin cargo, a cualquier persona que obtenga una copia de este software y los archivos de documentación asociados (el "Software"), para operar con el Software sin restricciones, incluidos, entre otros, los derechos de uso, copia, modificación, fusión, publicar, distribuir, sublicenciar y/o vender copias del Software, y permitir que las personas a quienes se les proporciona el Software lo hagan, sujeto a las siguientes condiciones:
El aviso de derechos de autor anterior y este aviso de permiso se incluirán en todas las copias o partes sustanciales del Software.
EL SOFTWARE SE PROPORCIONA "TAL CUAL", SIN GARANTÍA DE NINGÚN TIPO, EXPRESA O IMPLÍCITA, INCLUYENDO PERO NO LIMITADO A LAS GARANTÍAS DE COMERCIABILIDAD, IDONEIDAD PARA UN PROPÓSITO PARTICULAR Y NO INFRACCIÓN. EN NINGÚN CASO LOS AUTORES O TITULARES DE DERECHOS DE AUTOR SERÁN RESPONSABLES DE NINGÚN RECLAMO, DAÑO U OTRA RESPONSABILIDAD, YA SEA EN UNA ACCIÓN CONTRACTUAL, AGRAVIO O DE OTRA MANERA, QUE SURJA DE, FUERA DE O EN RELACIÓN CON EL SOFTWARE O EL USO U OTRAS NEGOCIOS EN EL SOFTWARE.
Incluya el archivo de clase en la página deseada y cree una instancia de la clase
dim zip
set zip = new aspZip
Abrir un archivo ZIP (crear o abrir un archivo existente en el disco)
zip.OpenArchieve("pathtofile.zip") ' this creates the archieve if it doesn't exists
Agregar algunos archivos o carpetas
zip.Add("..src")
zip.Add(".default.asp")
Escribe los archivos en el disco.
zip.CloseArchieve()
Si desea extraer el contenido de un archivo ZIP, utilice el método ExtractTo(DestinationPath)
zip.ExtractTo(".test")
Si el archivo no contiene archivos, se eliminará cuando se destruya el objeto.
Nota:
En la versión actual (0.4), el problema con la extracción solo de estructuras de directorios debería resolverse, pero los tiempos de procesamiento ahora son mucho más largos debido a la espera en la creación del directorio. El tiempo de espera adicional mínimo es de 500 ms.