Jag vill ta bort poster från en txt fil.
jag har löst det så som det är under, fast då tar den inte bort det utrymmet som det inte finns något i. + att det går bara ta bort en post. sen funkar det inte mer. inga felmedelanden eller något. det går bara inte att ta bort poster..

txt filens innehåll ser ut så här..

Karsten Tvarnö KT v1KaTv Stina Lindblad SL v1StLi Fredrik Karlberg FK v1FrKa där det blanka steget är en post som jag har raderat.
för att jag ska kunna radera en till post så måste jag mata in en ny. men problemet är ju fortfarande hur jag får bort det blanka.


Private Sub mnuTabort_Click()
Dim svar As String
Dim antal2 As Integer

antal2 = Antal - 1
Konton = Konton

svar = MsgBox("Vill du radera kontot?", vbYesNo)
If svar = vbYes Then

Konton.Efternamn = ""
Konton.Förnamn = ""
Konton.login = ""
Konton.Lösen = ""

Put filnr, antal2, Konton

post.post = antal2
End If

End Sub

Taget direkt från MSDN



Deleting Records
You could delete a record by clearing its fields, but the record would still exist in the file. Usually you don’t want empty records in your file, because they waste space and interfere with sequential operations. It is better to copy the remaining records to a new file, and then delete the old file.

To remove a deleted record in a random-access file

Create a new file.


Copy all the valid records from the original file into the new file.


Close the original file and use the Kill statement to delete it.


Use the Name statement to rename the new file with the name of the original file.

Tack. ska se om jag får det att funka.