how do i append a text to an existing txt file?

[debaser]

well

my application is a notepad that should add to a text file (*.txt) the new comments i write.
i just have a text editor and a "save" button. when i push save it has to add the new text to a specified txt file.

Code: Select all

      OpenFile(0, "appunti.txt")
      WriteString(String$)
      CloseFile(0)

with this code it overwrites everytime the first line....
[/code]

[sec]

Code: Select all

  OpenFile(0, "appunti.txt") 
Fileseek(lof())    
  WriteString(String$) 
      CloseFile(0) 

Correct it! thanks D*

[Dare2]

Code: Select all

If OpenFile(#_file, "outdoc.txt")
  FileSeek(lof())
  WriteStringN("<< APPENDED >>")
  CloseFile(#_file)
EndIf

Whup - slow typer. As Sec showed.

[Doobrey]

Shouldn't it be FileSeek(Lof()) instead of FileSeek(Eof())?

Edit.. beaten to it by Dare2 :roll:

[sec]

Shouldn't it be FileSeek(Lof()) instead of FileSeek(Eof())?

Edit.. beaten to it by Dare2 :roll:

my typo .

[Dare2]

It's a three-way tie!

[Doobrey]

It's a three-way tie!

OK, deathmatch it is then ...
Or would you prefer rock,paper,scissors ?

[Dare2]

rofl.

paper!

[PB]

viewtopic.php?t=3632