Sauvegarder un repertoire?

Question

Salut  tout le monde.

1°/ Je voudrais savoir si il était possible de faire une sauvegarde d'un répertoire complet (c'est à dire de tous les fichiers et dossiers qu'il y a à l'intérieur) dans un répertoire que l'utilisateur aura crée auparavant.

2°/ Je voudrais également savoir, si cette sauvegarde est possible, si on peut sauvegarder ce repertoire en .zip.

Merdi de vos réponses

Cédric

pcpunch · Answer

Pour copier un dossier et les sous dossiers(incluant les fichiers), il faut utiliser les Fso :

Dim fs
Set fs = CreateObject("Scripting.FileSystemObject")
fs.CopyFolder "d:\Dossier Source", "C:\Dossier cible", True

Cela t'evite de faire un fonction recursive qui recréer chaque sous dossier et copie les fichiers!!!!!!

pour ceux qui est du zip, c un peu plus complexe, il faut utiliser une dll "Zip32.dll" de memoire ? et je pense qu'il te faudra faire une fonction recursive qui te permettra d'envoyer chaque fichiers et sous fichiers(sous dossiers) vers le fichier Zip, car je ne pense pas qu'il est possible de zipper directement un dossier et les sous dossiers, mais je ne suis pas sur !!!

Ci joint une tres bonne src de Clemention, avec laquelle tu peu arriver a tes fin !!!
ClmZIp
++

Sauvegarder un repertoire?

1 réponse

Discussions similaires