Read files

[Pascal]

Hello everybody

I would like to get all files names in a specify folder but also in all
subfolders

How can I do that ?

Thanks

Pascal

 

[Ken Tucker [MVP]]

Hi,

Use recursion (A subroutine that calls itself) to list all the
files including sub directories.


How to use
ListFiles(Environment.GetFolderPath(Environment.SpecialFolder.Personal))



The procedure



Private Sub ListFiles(ByVal strPath As String)

Dim di As System.IO.DirectoryInfo

Try

di = New System.IO.DirectoryInfo(strPath)

For Each fi As System.IO.FileInfo In di.GetFiles

Trace.WriteLine(fi.Name)

Next

For Each diSub As System.IO.DirectoryInfo In di.GetDirectories

ListFiles(diSub.FullName)

Next

Catch ex As Exception

Trace.WriteLine("An error has occured")

End Try

End Sub



Ken

--------------------------

Hello everybody

I would like to get all files names in a specify folder but also in all
subfolders

How can I do that ?

Thanks

Pascal

 

[Herfried K. Wagner [MVP]]

I would like to get all files names in a specify folder but also in all
subfolders

<URL:http://dotnet.mvps.org/dotnet/samples/filesystem/downloads/FileSystemEn
umerator.zip>