Quellcode
- Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
- Dim Pfad_Windows(1) As String
- Pfad_Windows(0) = "C:\Users\user\Desktop\TEST\"
- Pfad_Windows(1) = "C:\Users\user\Desktop\TEST 2\"
- For Each Pfad As String In Pfad_Windows
- IO.Directory.GetFiles(Pfad)
- IO.File.Delete(Pfad)
- Next
- End Sub
Moin,
mein Code geht immer auf den Hammer und ich weiß nicht warum. Ich möchte gerne mehrere Ordner durchlaufen und die Ordnerinhalte löschen. Für einen Ordner ist das alle kein Problem, aber mit mehreren klappts bei mir einfach nicht. Hilfe!
VG
Lico