Hjælp til sletning af fil
Jeg Har den her:Try
Using sr As StreamReader = New StreamReader(Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments) _
& "\juke\musik.txt")
Dim line As String
Do
line = sr.ReadLine
Dim foldername As String = IO.Directory.GetParent(line).Name
line = IO.Path.GetFileNameWithoutExtension(line)
ListBox1.Items.Add(foldername & "-" & line)
Loop Until line Is Nothing
sr.Close()
End Using
Catch
End Try
Virker fint
Men kunne tænke mig at hvis "line" findes flere gange skal de slettes altså "Line" må kun findes 1 gang i juke\musik.txt, og slettes inden der bliver skrevet til listboxen