Listing directories

[brandonio21]

Hello Covert2String - Welcome to the forum!!

Here is a code that should work for you, not sure if it is exactly what you wanted:

Code:

Dim output As String = ""
        Dim dirinfo As New System.IO.DirectoryInfo(My.Application.Info.DirectoryPath)
        Dim allfileinfo() As System.IO.FileInfo = dirinfo.GetFiles("*", IO.SearchOption.AllDirectories)
        For Each item In allfileinfo
            If item.DirectoryName = My.Application.Info.DirectoryPath Then
                output = output + item.Name + vbNewLine
            Else
                output = output + item.DirectoryName + item.Name + vbNewLine
            End If
        Next