IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VBA Access Discussion :

Zipper un dossier avec ses sous-dossiers [FAQ]


Sujet :

VBA Access

  1. #1
    Membre actif

    Homme Profil pro
    Enseignant
    Inscrit en
    Août 2006
    Messages
    573
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 46
    Localisation : France

    Informations professionnelles :
    Activité : Enseignant

    Informations forums :
    Inscription : Août 2006
    Messages : 573
    Points : 258
    Points
    258
    Par défaut Zipper un dossier avec ses sous-dossiers
    Bonjour

    http://www.developpez.net/forums/sho...d.php?t=456521

    est ce que tu arrives à garder l'arborescence?
    moi je n'arrive qu'à compresser des fichiers en donnant le nom des fichiers à compresser.
    Je voudrais compresser l'ensemble d'un dossier avec ses sous-dossiers. Est ce possible?

    merci

  2. #2
    Expert éminent sénior
    Avatar de Dolphy35
    Homme Profil pro
    Responsable Systemes d'Information
    Inscrit en
    Octobre 2004
    Messages
    4 373
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 45
    Localisation : France, Ille et Vilaine (Bretagne)

    Informations professionnelles :
    Activité : Responsable Systemes d'Information
    Secteur : Industrie

    Informations forums :
    Inscription : Octobre 2004
    Messages : 4 373
    Points : 11 218
    Points
    11 218
    Par défaut
    Salut,

    avec le deuxième du post que tu cite :

    Zipper des fichiers en exécutant la fonction shell

    tu définis le dossier parent et par défaut tous les sous-dossiers enfants y seront compressés.


    Dolphy

  3. #3
    Membre actif

    Homme Profil pro
    Enseignant
    Inscrit en
    Août 2006
    Messages
    573
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 46
    Localisation : France

    Informations professionnelles :
    Activité : Enseignant

    Informations forums :
    Inscription : Août 2006
    Messages : 573
    Points : 258
    Points
    258
    Par défaut
    merci de ta réponse mais je crois comprendre que winzip doit être installé sur le pc du client. Est ce que je peux faire la meme chose avec une solution gratuite (7 zip par exemple)

    merci encore

  4. #4
    Membre actif

    Homme Profil pro
    Enseignant
    Inscrit en
    Août 2006
    Messages
    573
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 46
    Localisation : France

    Informations professionnelles :
    Activité : Enseignant

    Informations forums :
    Inscription : Août 2006
    Messages : 573
    Points : 258
    Points
    258
    Par défaut
    Bon j'ai toujours pas réussi à résoudre mon problème

    j'ai reussi avec l'aide de 7zip à écrire cette commande

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Shell "7z a -tzip ""compte rendu de tenue.zip"" ""C:\Program Files\Gestion Loge\compte rendu tenue\*"" -r"
    mais j'ai une erreur 53 fichier introuvable.
    je ne sais pas ce qu'il cherche si c'est l'exécutable qu'il ne trouve pas ou si c'est mon dossier car je rapelle que je veux compresser un dossier et tout ses répertoires....

    merci

  5. #5
    Membre actif

    Homme Profil pro
    Enseignant
    Inscrit en
    Août 2006
    Messages
    573
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 46
    Localisation : France

    Informations professionnelles :
    Activité : Enseignant

    Informations forums :
    Inscription : Août 2006
    Messages : 573
    Points : 258
    Points
    258
    Par défaut
    ca y est j'ai trouvé il manquait le chemin du fichier 7z.exe

    voici donc la procédure....

    copier le fichier 7z.exe dans le répertoire de votre programme
    voir le fichier d'aide de 7zip pour quelques explications.....

    dans votre code mettre cette ligne s'il n'y a pas de paramètre (chemin de destination)

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Shell """C:\Program Files\rep programme\7z.exe"" a -tzip ""C:\rep destination\nomarchive.zip"" ""C:\Program Files\rep programme\compte rendu\*"" -r"
    Les doubles guillemets c'est pour les chemins contenant des espaces


    en cas de variable:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Dim commande As String
    commande = """C:\Program Files\rep programme\7z.exe"" a -tzip """ & Destination & "nom archive.zip"" ""C:\Program Files\rep programme\compte rendu tenue\*"" -r"
    Shell commande
    Destination est une variable qui contient mon chemin de destination celui ci etant défini par l'utilisateur....

    voila j'ai bien galéré mais je suis sur que beaucoup d'entre vous seront content d'avoir ces modestes lignes

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [Batch] Déplacer les fichiers des dossiers et des sous dossiers vers un autre dossier
    Par mathou115 dans le forum Scripts/Batch
    Réponses: 4
    Dernier message: 25/06/2014, 10h17
  2. [AC-2007] Parcourir un dossier et ses sous-dossier
    Par Mut dans le forum VBA Access
    Réponses: 2
    Dernier message: 01/02/2012, 14h30
  3. [Snow Leopard] Problème de droits avec un dossier, ses sous-dossier et ses fichiers
    Par rambc dans le forum Apple
    Réponses: 21
    Dernier message: 07/03/2010, 10h18
  4. Comment copier un dossier et ses sous dossiers ?
    Par touhami dans le forum Langage
    Réponses: 5
    Dernier message: 30/12/2004, 16h10

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo