Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1728 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [VB6] Decompresser un fichier ZIP

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[VB6] Decompresser un fichier ZIP

n°1621751
Turk182
Strike Again !!!
Posté le 10-10-2007 à 16:29:23  profilanswer
 

Salut,
 
J'ai un petit programme en VB qui se connecte sur un FTP et en affiche le contenu. Ensuite l'on a la possibilité de telecharger le fichier qui est en ZIP. Je voudrais savoir comment faire pour decompresser ce fichier et n'en garder que le contenu.
 
Merci


---------------
Mes mémoires de Retrogamer - Le Retroblog de Turk182! en livres - Suivez le blog sur Facebook
mood
Publicité
Posté le 10-10-2007 à 16:29:23  profilanswer
 

n°1621762
tegu
Posté le 10-10-2007 à 16:38:24  profilanswer
 

Je ne sais pas ce que ça vaut, mais il m'a fallu 5 secondes pour trouver ça...
http://www.vbfrance.com/codes/LIRE [...] 39592.aspx

n°1621782
Turk182
Strike Again !!!
Posté le 10-10-2007 à 16:57:05  profilanswer
 

oui moi aussi je l'avais trouvé mais vu que c'est pour l'implanter dans un programme, je voulais savoir si il y avait une manière plus simple, sans passer par des classes etc...seulement en utilisant par exemple la Dll UNZIP32.DLL


---------------
Mes mémoires de Retrogamer - Le Retroblog de Turk182! en livres - Suivez le blog sur Facebook
n°1623366
Thierry_94
Posté le 13-10-2007 à 19:55:23  profilanswer
 

Bonjour,
Le code que j'utilise :
Activer la référence "Microsoft Shell Controls And Automation"
---------------------------------
Dim osa As Shell
    xrDec = <répertoire de décompression>
    nfCom = <chemin et nom du fichier à décompresser>  
    Set osa = New Shell
' Nombre de fichiers à extraire
    nbFic = osa.Namespace(nfCom).Items.Count
' Décompression des fichiers
    osa.Namespace(xrDec).CopyHere osa.Namespace(nfCom).Items
    Set osa = Nothing
---------------------------------
 
A+

n°1623588
Turk182
Strike Again !!!
Posté le 15-10-2007 à 08:30:57  profilanswer
 

super merci !!!  tu me sauve la vie !!!!


---------------
Mes mémoires de Retrogamer - Le Retroblog de Turk182! en livres - Suivez le blog sur Facebook
n°2183493
minege
Admin de MG
Posté le 01-04-2013 à 23:21:14  profilanswer
 

Salut !
J'ai activer la réference Microsoft Shell Controls And Automation.
J'ai essayer de mettre ton code et il me souligne les petits mots comme xrDec, nfCom, nbFic, Shell.
Je suis vraiment bloquer là-dessus et j'aimerais bien avoir de l'aide au plus vite !
Merci d'avance
 
A+ :)


---------------
Mine-Generation|Le serveur PvP sanglant !!
n°2183777
buffalophi​l
Posté le 03-04-2013 à 11:33:22  profilanswer
 

minege a écrit :

Salut !
J'ai activer la réference Microsoft Shell Controls And Automation.
J'ai essayer de mettre ton code et il me souligne les petits mots comme xrDec, nfCom, nbFic, Shell.
Je suis vraiment bloquer là-dessus et j'aimerais bien avoir de l'aide au plus vite !
Merci d'avance
 
A+ :)


Bonjour,
J'ai créé vite fait un petit programme en VB6 avec le code de Thierry_94
pas de problème, j'ai simplement ajouté les déclarations des variables xrDec, nfCom, nbFic car j'utilise "Option explicit" en Général
mais ce n'est pas une obligation.
je n'ai aucun "soulignement" (?) sur la commande shell
et j'ai rien déclarer d'autre que "Microsoft Shell Controls and Automation" dans les références  
 
Bon courage

n°2184776
minege
Admin de MG
Posté le 08-04-2013 à 17:06:18  profilanswer
 

buffalophil a écrit :


Bonjour,
J'ai créé vite fait un petit programme en VB6 avec le code de Thierry_94
pas de problème, j'ai simplement ajouté les déclarations des variables xrDec, nfCom, nbFic car j'utilise "Option explicit" en Général
mais ce n'est pas une obligation.
je n'ai aucun "soulignement" (?) sur la commande shell
et j'ai rien déclarer d'autre que "Microsoft Shell Controls and Automation" dans les références  
 
Bon courage


C'est bizarre, car moi, quand j'ai mis ça il m'a souligné tout ces mots.
Microsoft Visual Basic Express 2010 c'est VB6 ?
En Vb.net je sais pas si c'est ça, pour déclarer les variables, c'est "Dim"


Message édité par minege le 18-04-2013 à 17:42:39

Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [VB6] Decompresser un fichier ZIP

 

Sujets relatifs
VB6 et Winsock[RESOLU]creation fichier txt
[Resolu] Parcourir tout les fichier d'un dossier et detecter des motsVBA: aller chercher la valeur d'une cellule d'un autre fichier ouvert
Soucis avec mon premier fichier XSLtrouver le fichier le plus récent
Renseignement pour fichier CABexporter une bd access en fichier texte en vb6
Affichage des Fichier en Batch 
Plus de sujets relatifs à : [VB6] Decompresser un fichier ZIP


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR