Copyright (c) 2012 RCDMK <[email protected]>
L'autorisation est accordée par la présente, gratuitement, à toute personne obtenant une copie de ce logiciel et des fichiers de documentation associés (le "Logiciel"), d'utiliser le Logiciel sans restriction, y compris, sans limitation, les droits d'utilisation, de copie, de modification, de fusion, publier, distribuer, accorder des sous-licences et/ou vendre des copies du Logiciel, et permettre aux personnes à qui le Logiciel est fourni de le faire, sous réserve des conditions suivantes :
L'avis de droit d'auteur ci-dessus et cet avis d'autorisation doivent être inclus dans toutes les copies ou parties substantielles du logiciel.
LE LOGICIEL EST FOURNI « TEL QUEL », SANS GARANTIE D'AUCUNE SORTE, EXPRESSE OU IMPLICITE, Y COMPRIS MAIS SANS LIMITATION LES GARANTIES DE QUALITÉ MARCHANDE, D'ADAPTATION À UN USAGE PARTICULIER ET DE NON-VIOLATION. EN AUCUN CAS LES AUTEURS OU LES TITULAIRES DES DROITS D'AUTEUR NE SERONT RESPONSABLES DE TOUTE RÉCLAMATION, DOMMAGES OU AUTRE RESPONSABILITÉ, QUE CE SOIT DANS UNE ACTION CONTRACTUELLE, DÉLIT OU AUTRE, DÉCOULANT DE, DE OU EN RELATION AVEC LE LOGICIEL OU L'UTILISATION OU D'AUTRES TRANSACTIONS DANS LE LOGICIEL.
Incluez le fichier de classe dans la page souhaitée et instanciez la classe
dim zip
set zip = new aspZip
Ouvrir un fichier ZIP (créer ou ouvrir un fichier existant sur le disque)
zip.OpenArchieve("pathtofile.zip") ' this creates the archieve if it doesn't exists
Ajouter des fichiers ou des dossiers
zip.Add("..src")
zip.Add(".default.asp")
Écrivez les fichiers sur le disque
zip.CloseArchieve()
Si vous souhaitez extraire le contenu d'un fichier ZIP, utilisez la méthode ExtractTo(DestinationPath)
zip.ExtractTo(".test")
Si l'archive ne contient aucun fichier, elle sera supprimée lors de la destruction de l'objet.
Note:
Dans la version actuelle (0.4), le problème d'extraction uniquement des structures de répertoires devrait être résolu, mais les temps de traitement sont désormais beaucoup plus longs, en raison de l'attente lors de la création du répertoire. Le temps d'attente supplémentaire minimum est de 500 ms.