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

Signaler
Messages postés
52
Date d'inscription
mercredi 16 mars 2005
Statut
Membre
Dernière intervention
26 août 2009
-
Messages postés
745
Date d'inscription
mardi 30 novembre 2004
Statut
Membre
Dernière intervention
15 septembre 2009
-
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

Messages postés
745
Date d'inscription
mardi 30 novembre 2004
Statut
Membre
Dernière intervention
15 septembre 2009
4
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
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 123 internautes nous ont dit merci ce mois-ci

Messages postés
745
Date d'inscription
mardi 30 novembre 2004
Statut
Membre
Dernière intervention
15 septembre 2009
4
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'.

@+
Messages postés
52
Date d'inscription
mercredi 16 mars 2005
Statut
Membre
Dernière intervention
26 août 2009

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