Scrivere all'interno di un file di testo

In questa pagina prenderemo in considerazione il caso in cui si intende scrivere all'interno di un file di testo già esistente.

Aggiungere dati alla fine del file

Per scrivere ulteriori dati alla fine del file di testo, si dovrà avere l'accortezza di aprire il file in scrittura aggiungendo anche la parola Append.
Esempio:

Public Sub Main()

 Dim fl As File
 

  fl = Open "/tmp/nomefile" For Write Append

  Write #fl, "testo da accodare"

  fl.Close

End

Sostituzione di alcuni dati

Per effettuare la sostituzione di alcuni dati stringa presenti nel file di testo con altri nuovi, bisognerà individuare la posizione iniziale del primo byte da sostituire nel file medesimo; quindi far cominciare la scrittura dei nuovi dati da quella posizione.
L'individuazione della posizione all'interno del file per la scrittura viene effettuata con l'istruzione Seek.
Esempio:

 Public Sub Main()

 Dim fl As File
 

  fl = Open "/tmp/nomefile" For Write

' Impostiamo il puntatore al 10° byte all'interno del file:
  Seek #fl, 9

  Write #fl, "nuovo testo in sostituzione del vecchio"

  fl.Close

End

Aggiungere una riga

Prendiamo ora in considerazione il caso in cui si intende aggiungere una riga all'interno di un file di testo, composto da più righe di testo.

Pagina in costruzione !