Paraglider
Messages postés35Date d'inscriptionmercredi 19 mars 2003StatutMembreDernière intervention 6 février 2014
-
5 janv. 2008 à 12:55
Paraglider
Messages postés35Date d'inscriptionmercredi 19 mars 2003StatutMembreDernière intervention 6 février 2014
-
5 janv. 2008 à 16:34
Bonjour,
Bonne Année 2008 à tous.
J'ai un répertoire contenant plusieurs types de fichiers (csv. log, txt,...)
Je dois zipper certains de ces fichiers.
Comment ne sélectionner par exemple, que les fichiers csv et txt ??
Pour l'instant j'utilise cette ligne de code mais cela ne me ramène qu'un
seul type de fichier (ici les csv)!!
Dim i As Integer
sFiles = Directory.GetFiles(MonRepertoire, "*.csv ")
For i = 0 To sFiles.GetUpperBound(0)
Debug.Print(sFiles(i))
Next
Et si je met "*.*" cela me les ramène tous :-)
Comment spécifier plusieurs types de fichiers , par exemple, uniquement les csv et les txt ???
cs_Exploreur
Messages postés4821Date d'inscriptionlundi 11 novembre 2002StatutMembreDernière intervention15 novembre 201615 5 janv. 2008 à 13:05
Salut,
Fais-en une function que tu appelles 2 fois en donnant comme paramètre String, l'extention des fichiers à chercher(voir à lister dans une ListBox) : *.Txt et *.Csv
Paraglider
Messages postés35Date d'inscriptionmercredi 19 mars 2003StatutMembreDernière intervention 6 février 20141 5 janv. 2008 à 16:34
Bonjour,
Apparement le paramètre searchPattern de GetFile ne permet pas de mettre plusieurs extensions. J'ai donc trouvé comme solution de créer un tableau avec les extensions de fichier souhaitées et un tableau avec tous les fichiers du répertoire. Je boucle sur le tableau des extensions et les fichiers du répertoire, si l'extension corresponds(EndsWith("." + tableauExtension(x)), je zippe le fichier.