Bonjour,
Comment peut-on renvoyer dans une textbox ou un combobox le nom d'un répertoire parent d'un fichier x.
Je m'explique:
Grâce à un DirectoriesInfo je vérifie si un fichier.extension existe dans tous les sous répertoires d'un répertoire connu.
Voir exemple ci-dessous:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15 Dim path1 As DirectoryInfo = New DirectoryInfo("C:\RépConnu\SousRep\") Dim path2 As DirectoryInfo Dim path3 As FileInfo For Each path2 In path1.GetDirectories For Each path3 In path2.GetFiles("fichier.extension") If path3.Exists Then combobox1.Text = 'là je veux renvoyer le nom du sous repertoire. end if Next Next
Là où je bloque c'est pour renvoyer le nom du SousRep.
Partager