Hallo,
Ich möchte alle Dateien aus dem Ordner MyDocuments ( Eigene Dateien ) per Rekursion rausholen.
Hier mein Code:
In der ListBox steht immer (Auflistung) & nie die Dateien.
Kann mir jemand sagen was ich falsch mache?
Ich möchte alle Dateien aus dem Ordner MyDocuments ( Eigene Dateien ) per Rekursion rausholen.
Hier mein Code:
VB.NET-Quellcode
- Public Class Form1
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
- ListBox1.Items.Add(Rekursion(Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments)))
- End Sub
- Private Function Rekursion(ByVal Ordnerpfad As String) As List(Of String)
- Dim Dateien As New List(Of String)
- Dateien.AddRange(IO.Directory.GetDirectories(Ordnerpfad))
- Return Dateien
- End Function
- End Class
In der ListBox steht immer (Auflistung) & nie die Dateien.
Kann mir jemand sagen was ich falsch mache?