04. august 2003 - 12:04Der er
3 kommentarer og 2 løsninger
Tekstfil og tilføje ny linje hvergang
Hejsa
JEg gemmer indtastning fra formularfelter i tekstfiler og det går fint. Det er meningen at hvergang man indtaster i et specielt felt så gemmes indtastningen i tekstfilen og hvis man indtaster flere forskellige værdier skal de osse gemmes i samme tekstfil. Probelmer er blot at det den linje der allerede er gemt bliver slettet og erstattet med ny indtastning og det er jo ikke meningen. Anyone ?
Dim sw As StreamWriter = New StreamWriter ("c:\temp\file.txt") 'Add some text to the file. sw.Write("This is the ") sw.WriteLine("header for the file.") sw.WriteLine("-------------------") 'Arbitrary objects can also be written to the file. sw.WriteLine(txtfastnavn1) sw.Write(txtfastbelob1 & Chr(32) & Chr(32))
Dim sw As StreamWriter = New StreamWriter ("c:\temp\file.txt") 'Add some text to the file. sw.Write("This is the ") sw.WriteLine("header for the file.") sw.WriteLine("-------------------") 'Arbitrary objects can also be written to the file. sw.WriteLine(txtfastnavn1) sw.Write(txtfastbelob1 & Chr(32) & Chr(32) & vbCrLf)
sw.Close()
Eller
Dim sw As StreamWriter = New StreamWriter ("c:\temp\file.txt") 'Add some text to the file. sw.Write("This is the ") sw.WriteLine("header for the file.") sw.WriteLine("-------------------") 'Arbitrary objects can also be written to the file. sw.WriteLine(txtfastnavn1) sw.Write(txtfastbelob1 & Chr(32) & Chr(32) & vbNewL)
Dim sw As StreamWriter = File.AppendText("c:\temp\file.txt") 'Add some text to the file. sw.Write("This is the ") sw.WriteLine("header for the file.") sw.WriteLine("-------------------") 'Arbitrary objects can also be written to the file. sw.WriteLine(txtfastnavn1) sw.Write(txtfastbelob1 & Chr(32) & Chr(32)) sw.Close()
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
