Discussion :

[fny_bnfnt]

Bonsoir,

je cherche à savoir comment remplir ma combobox avec des sous-répertoires.
Pour ce qui est de la remplir de fichiers .txt : ok mais j'ai essayé plusieurs code je n'y parviens pas

exemple:
j'ai mon dossier "C:\recettes\gateaux"
et j'aimerais remplir ma combobox des sous-répertoires de "gateaux"

pouvez-vous m'aider s'il vous plaît ?

cordialement

PS : voici mon code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
        Dim Chemin As String = "C:\coconut-weight\coconut-weight\bin\Debug\sauvegardes"
        Dim sFiles() As String
        Dim nbfiles As Integer
        Dim i As Integer
        sFiles = Directory.GetFiles(Chemin)
        nbfiles = Directory.GetFiles(Chemin).Length()
 
        For i = 0 To nbfiles - 1
            Dim pathfile As String = sFiles(i)
            ComboBox1.Items.Add(pathfile)
 
        Next

[tomlev]

Directory.GetFiles renvoie les fichiers
Directory.GetDirectories renvoie les sous-répertoires

[fny_bnfnt]

J'ai résolu
merci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
        Dim DirInfo As New IO.DirectoryInfo("c:\coconut-weight\coconut-weight\bin\Debug\sauvegardes")
        For Each DInfo As IO.DirectoryInfo In DirInfo.GetDirectories
            ComboBox1.Items.Add(DInfo.Name)
        Next