Lister le nom des sous-dossiers d'un répertoire dans une listbox

Résolu
Henkala Messages postés 16 Date d'inscription jeudi 4 juin 2009 Statut Membre Dernière intervention 11 juin 2014 - 15 juin 2009 à 13:59
Henkala Messages postés 16 Date d'inscription jeudi 4 juin 2009 Statut Membre Dernière intervention 11 juin 2014 - 15 juin 2009 à 15:14
Bonjour,

J'ai besoin d'afficher dans une listbox les sous-dossiers d'un répertoire donné en VB.NET :

j'utilise le code suivant, mais celui-ci me retourne les chemins des différents dossiers dans la listbox :

Private
Sub Fadmin_Load(
ByVal sender
As System.Object,
ByVal e
As System.EventArgs)
Handles
MyBase.Load

' Initialisation de la liste des sitesLsites.Items.AddRange(System.IO.Directory.GetDirectories(

"C:\VB\Admin Change Ip\Admin Change Ip\Sites"))

End
Sub

cordialement,

2 réponses

Mayzz Messages postés 2813 Date d'inscription mardi 15 avril 2003 Statut Membre Dernière intervention 2 juin 2020 30
15 juin 2009 à 14:12
Bonjour,

Essaye ceci :

Dim _main_Dir As New IO.DirectoryInfo("Le chemin de ton dossier")
For Each _Dir In _main_Dir.GetDirectories
    Lsites.Items.Add(_Dir.Name)
Next 

Mayzz.

                                                                              
Si le déboguage est l'art d'enlever les bogues, la programmation doit être l'art de les créer. <
3
Henkala Messages postés 16 Date d'inscription jeudi 4 juin 2009 Statut Membre Dernière intervention 11 juin 2014
15 juin 2009 à 15:14
Merci Mayzz, ça marche !

Cordialement.
0
Rejoignez-nous