repertoire est une chaîne
repertoire=fRepSélecteur("c:\","Choisir un répertoire de destination...")
rep_fichiers est une chaîne
rescréation est un entier
rep_fichiers=repertoire+"essai.wdz"
i est un entier
rescréation = zipCrée("essai" , rep_fichiers )
SI rescréation <> 0 ALORS
Erreur("Erreur")
RETOUR
FIN
zipAjouteListeFichier("essai","C:\Mes Projets\Auto\Exe\*.fic")
zipFerme("essai")
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=14&topic_id=3662&post_id=15411