ZIP - UNZIP : CLASSES POUR GÉRER VOS ZIPS

Signaler
Messages postés
4525
Date d'inscription
dimanche 29 septembre 2002
Statut
Modérateur
Dernière intervention
22 avril 2019
-
Messages postés
1
Date d'inscription
jeudi 9 janvier 2003
Statut
Membre
Dernière intervention
31 août 2010
-
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/24072-zip-unzip-classes-pour-gerer-vos-zips

Messages postés
1
Date d'inscription
jeudi 9 janvier 2003
Statut
Membre
Dernière intervention
31 août 2010

Bonjour,
Pour la décompression d'un fichier avec 0 octet ou d'un fichier déjà zipper la décompression ne fonctionne pas !!
Pour celà il faut mettre la variable niveau de compression à 0
voici la correction que j'ai apporté au source:

dans la function FileAddSingle:

Select Case cZipError
Case 0, 7 ' c'est OK on complète les données au tableau
With tabFiles(cptTab)
.commun = varCommunZF
'---------------------------------------
'Modification apportée le 11/08/2010
'---------------------------------------
If (varCommunZF.UncompressedSize 0) Or (InStrRev(UCase(sFileName), ".ZIP", , vbBinaryCompare) > 0) Then .commun.CompressionMethod 0

.localFileHeaderZF = LocalFileHeader
.centralFileHeaderZFA = CentralFileHeaderA
.centralFileHeaderZFC = CentralFileHeaderC
etc.....
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
69
Merci pour ce code.
je l'ai déplumé totalement, viré les structures etc.

http://www.vbfrance.com/codes/SABNZBD-UPLOAD-FICHIERS-NZB_50575.aspx

ma problématique etait simple: me faut générer en mémoire le contenu d'un zip, ne contenant qu'un seul fichier.
Messages postés
14008
Date d'inscription
samedi 29 décembre 2001
Statut
Modérateur
Dernière intervention
28 août 2015
75
Pas fait gaffe à ce "détail".
Faudrait regarder en mode debug ce qu'on trouve lorsqu'il s'occupe de la structure vide.
Désolé, pas le temps d'approfondir.
Messages postés
91
Date d'inscription
mercredi 6 novembre 2002
Statut
Membre
Dernière intervention
20 mars 2009

Excellente source, sauf quand on dezip une source déjà compréssée (par 7z par ex) les dossiers vides ne sont pas reconnus.
Ya t'il qq part un paramètre à modifier ou rajouter ??
Afficher les 69 commentaires