Revision: 77126
Initial Code
Initial URL
Initial Description
Initial Title
Initial Tags
Initial Language
at August 23, 2019 03:03 by martinbrait
Initial Code
Private ListeInfo As New ArrayList
' La fonction qui va remplir notre arraylist
Private function ListeFichier(ByVal repertoire As DirectoryInfo, ByVal Reset As Boolean) as arraylist
If Reset = True Then
ListeInfo.Clear()
End If
If repertoire.GetDirectories.Length <> 0 Then
For Each repertoire2 As DirectoryInfo In repertoire.GetDirectories
ListeFichier(repertoire2, False)
Next
End If
For Each fichier As FileInfo In repertoire.GetFiles("*.*")
ListeInfo.Add(fichier.Name)
Next
return ListeInfo
End function
'Pour appeler la fonction on fait ListeFichier("C:/",true)
'Le booleen en parametre veut dire qu'on efface tout ce qu'il y a déjà dans l'arraylist
Initial URL
Initial Description
list files from directory and subdirectory into a table 'On déclare une arraylist qui contiendra tous les fichiers
Initial Title
[vbnet] [directory] lister les fichiers d'un répertoire et d'un sous-répertoire dans un tableau
Initial Tags
list, array, files, directory
Initial Language
VB.NET