bij opslaan vorige tekst verwijderen

[infur]

ik ben bezig met het opslaan in een .txt bestand het werkt wel, maar hij zet de tekst erbij bijvoorbeeld het is 75000 en daarna 7500075000
zou iemand me kunnen helpen. alvast bedankt.

Dim fwrite As StreamWriter
        fcreate = New FileStream(My.Application.Info.DirectoryPath + "\saves\slot1.txt", FileMode.Create)
        fwrite = New StreamWriter(fcreate)
        fwrite.Write(TextBox1.Text)
        fwrite.Close()
        fcreate.Close()

 

[The Mighty Atom]

Ik gebruik altijd een streamwriter:

       Dim fwrite As New StreamWriter(Application.StartupPath & "\saves\slot1.txt", False)
        fwrite.Write(TextBox1.Text)
        fwrite.Close()

Het False keyword zorgt ervoor dat het textbestand steeds overschreven wordt. Zet je dit op True, dan wordt er steeds text bij geplaatst.

 

[infur]

bedankt:thumb: