Differenze tra le versioni di "Aggiungere una riga di caratteri alla fine di un file di testo"
Da Gambas-it.org - Wikipedia.
| Riga 6: | Riga 6: | ||
Dim fl As File | Dim fl As File | ||
Dim riga As String = "Questa è la riga da aggiungere alla fine del file di testo." | Dim riga As String = "Questa è la riga da aggiungere alla fine del file di testo." | ||
| − | + | ||
| − | fl = Open "<FONT Color= | + | fl = Open "<FONT Color=darkgreen>''/percorso/del/file/di/testo''</font>" For Write <FONT Color=red>Append</font> |
Write #fl, riga | Write #fl, riga | ||
| Riga 21: | Riga 21: | ||
Dim riga As String = "Questa è la riga da aggiungere alla fine del file di testo." | Dim riga As String = "Questa è la riga da aggiungere alla fine del file di testo." | ||
| − | File<FONT Color=#B22222>.Save</font>("<FONT Color= | + | File<FONT Color=#B22222>.Save</font>("<FONT Color=darkgreen>''/percorso/del/file/di/testo''</font>", File<FONT Color=#B22222>.Load</font>("<FONT Color=darkgreen>''/percorso/del/file/di/testo''</font>") & riga) |
End | End | ||
Versione attuale delle 17:22, 28 giu 2024
Per aggiungere una riga di caratteri in un file di testo, è possibile adottare almeno due modalità.
1) aprendo in Scrittura il file di testo con l'istruzione Open e usando la parola-chiave Append :
Public Sub Main()
Dim fl As File
Dim riga As String = "Questa è la riga da aggiungere alla fine del file di testo."
fl = Open "/percorso/del/file/di/testo" For Write Append
Write #fl, riga
fl.Close
End
2) usando i Metodi ".Load()" e ".Save()" dela Classe statica File:
Public Sub Main()
Dim riga As String = "Questa è la riga da aggiungere alla fine del file di testo."
File.Save("/percorso/del/file/di/testo", File.Load("/percorso/del/file/di/testo") & riga)
End
In entrambi i casi l'aggiunta del valore (&h0A) di "nuova riga a capo" dopo l'ultima riga del file di testo, avviene automaticamente.
