Skriva över text

ArneMedlem sedan maj 2000267 inlägg

Trådstart16 aug. 2009 08:51#1

Hur skriver jag över texten i en textfil alt. radera texten innan jag skriver till den. Den kod jag nu använder lägger ju till en ny rad för varje gång jag använder checkboxen?
Vill bara ha en textrad.....

    Protected Sub cbNytidning_CheckedChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles cbNytidning.CheckedChanged

        Dim txtTidning As String = Server.MapPath("~/upload/flash/start_autumn/tidning.txt")
        Dim objStreamWriter As StreamWriter
        objStreamWriter = File.AppendText(txtTidning )

        If cbNytidning.Checked Then
            objStreamWriter.WriteLine("&var1=nytt&")
        Else
            objStreamWriter.WriteLine("&var1=Nonytt&")
        End If

        objStreamWriter.Close()

    End Sub

LovlkaMedlem sedan aug. 200416 inlägg

20 aug. 2009 13:01#2

Det lättaste är ju att ta bort filen varje gång...

Protected Sub cbNytidning_CheckedChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles cbNytidning.CheckedChanged

        Dim txtTidning As String = Server.MapPath("~/upload/flash/start_autumn/tidning.txt")
        File.Delete(txtTidning)

        Dim objStreamWriter As StreamWriter
        objStreamWriter = File.AppendText(txtTidning )

        If cbNytidning.Checked Then
            objStreamWriter.WriteLine("&var1=nytt&")
        Else
            objStreamWriter.WriteLine("&var1=Nonytt&")
        End If

        objStreamWriter.Close()

    End Sub