Hallo Community,
wie kann ich eine Datei oder einen Ordner löschen, welcher sich hinter einer TreeView Node befindet.
Ich habe eine Treeview, welche mir die Unterordner und Dateien eines bestimmten Ordners anzeigt.
Diesen Ordner speichere ich in den My.Settings.
Nun möchte ich aus meinem VB Programm heraus, bestimmte Ordner löschen.
Dazu habe ich folgende Routine
Leider gibt er mir an, dass die er keine Datei zum löschen findet.
Ich wäre für eine Hilfe sehr dankbar.
hier noch ein Screenshot vom gefüllten Treeview Element.
Vielleicht kann mir ja jemand meinen Code so abändern, dass er endlich funktioniert.
Vielen Dank
MfG
aPeu
wie kann ich eine Datei oder einen Ordner löschen, welcher sich hinter einer TreeView Node befindet.
Ich habe eine Treeview, welche mir die Unterordner und Dateien eines bestimmten Ordners anzeigt.
Diesen Ordner speichere ich in den My.Settings.
Nun möchte ich aus meinem VB Programm heraus, bestimmte Ordner löschen.
Dazu habe ich folgende Routine
VB.NET-Quellcode
- If TN Is Nothing Then
- Status.Text = "Es sind keine Elemente zum Löschen vorhanden!"
- Else
- Dim result As DialogResult = MessageBox.Show("Mit dem Löschen fortsetzen?", Me.Text, MessageBoxButtons.YesNo, MessageBoxIcon.Question)
- If result = DialogResult.Yes Then
- TreeView1.SelectedNode.Remove()
- Try
- My.Computer.FileSystem.DeleteFile(My.Settings.speicher & "\" & TN. & "\" & Subtn.Tag & ".html")
- Catch es As SystemException
- MsgBox(es.Message)
- 'My.Computer.FileSystem.DeleteFile(My.Settings.speicher & "\" & TreeView1.SelectedNode.Text & ".html")
- End Try
- 'My.Computer.FileSystem.DeleteFile(My.Settings.speicher & "\" & TreeView1.SelectedNode.Text.Replace(" ", "_") & "\" & Subtn.Text.Replace(" ", "_") & ".html")
- Status.Text = "Löschvorgang erfolgreich abgeschlossen"
- End If
- End If
Leider gibt er mir an, dass die er keine Datei zum löschen findet.
Ich wäre für eine Hilfe sehr dankbar.
hier noch ein Screenshot vom gefüllten Treeview Element.
Vielleicht kann mir ja jemand meinen Code so abändern, dass er endlich funktioniert.
Vielen Dank
MfG
aPeu