[vb.net] Récuperer les noms de chaque fichiers d'un répertoire...

Résolu
lebender33 Messages postés 52 Date d'inscription mercredi 16 mars 2005 Statut Membre Dernière intervention 26 août 2009 - 17 juin 2005 à 16:19
cs_drahcir Messages postés 745 Date d'inscription mardi 30 novembre 2004 Statut Membre Dernière intervention 15 septembre 2009 - 20 juin 2005 à 12:03
Bonjour todo el mundo,

Alors voila je sais que le sujet a déja été abordé mais jamais en vb.net (du moins j'ai pas trouvé).

Je cherche a récuper les noms de tout les fichiers d'un repertoire en vb.net.

merci

++
Bender

3 réponses

cs_drahcir Messages postés 745 Date d'inscription mardi 30 novembre 2004 Statut Membre Dernière intervention 15 septembre 2009 4
20 juin 2005 à 12:03
Salut,

essaye ça, ça devrait marcher :


Dim lesfich
As ArrayList

Dim i
As
Integer
Dim dossier
As System.IO.Directory

Dim tabDossier
As
String()

Dim dir
As
String


tabDossier = dossier.GetFiles(rep)


lesfich =
New ArrayList(tabDossier.Length)



For
Each dir
In tabDossier


lesfich.Add(dir)



Next dir

@+
3
cs_drahcir Messages postés 745 Date d'inscription mardi 30 novembre 2004 Statut Membre Dernière intervention 15 septembre 2009 4
17 juin 2005 à 17:09
Salut,


Dim dossier
As System.IO.Directory


Dim tabDossier
As
String()


tabDossier = dossier.GetFiles(rep)

ainsi tu récupères tous les fichiers du répertoire 'rep'.

@+
0
lebender33 Messages postés 52 Date d'inscription mercredi 16 mars 2005 Statut Membre Dernière intervention 26 août 2009
20 juin 2005 à 11:37
Merci,
apparement ca marche mais j'ai tout de meme probleme. Je fait :

Dim lesfich() As String
Dim i As Integer
Dim dossier As System.IO.Directory
Dim tabDossier As String()
Dim dir As String

tabDossier = dossier.GetFiles(rep)
i = 0
For Each dir In tabDossier
lesfich(i) = dir
'Me.Label1.Text = "laboucle" + lesfich( i )
i = i + 1
Next dir

et mon tableau lesfich(), ne se remplie pas je ne sais pas pourquoi...
Si t'as une idée
Merci

Bender
0
Rejoignez-nous