Dir FilesList !!
For Each foundFile As String In My.Computer.FileSystem.GetFiles(TextBox1.Text, SearchOption.SearchTopLevelOnly, "*.*") foundFile = Replace(foundFile, TextBox1.Text & "\", "") ListBox1.Items.Add(foundFile) Next
For Each foundFile As String In My.Computer.FileSystem.GetFiles(TextBox1.Text, SearchOption.SearchTopLevelOnly, "*.*")
foundFile = Replace(foundFile, TextBox1.Text & "\", "")
ListBox1.Items.Add(foundFile)
Next
( dirfileslist.html )- by Paolo Puglisi
- Modifica del 17/12/2023