Scrivere un file di testo

Nella lezione precedente abbiamo visto come leggere dei file, in questa vedremo come scriverli... esistono 2 modi: scrivere file nuovi o file già esistenti, in quest'ultimo caso è possibile decidere se scrivere cancellando il contenuto già presente o aggiungerlo alla fine...

Per scrivere una riga si utilizza il metodo Write, in questo modo:

objTextStream.Write("testo da inserire")

mentre utilizzando WriteLine si scriverà una riga e si andrà a capo:

objTextStream.WriteLine("testo da inserire")

Infine per fare n ritorni a capo, basta utilizzare WriteBlankLines(n):

objTextStream.WriteBlankLines(n)

Ecco un codice completo per scrivere del testo all'interno di un file:

strPath = Server.Mappath("file.txt")
Set objFileSy = Server.CreateObject("Scripting.FileSystemObject")
Set objApriFile = objFileSy.OpenTextFile(strPath, ForWriting)
objApriFile.Write("Ciao")
objApriFile.WriteLine(" Matteo")
objApriFile.WriteBlankLines(2)
objApriFile.Write("sono Lorenzo")
objApriFile.close
Set objApriFile = Nothing
Set objFileSy = Nothing

Come già detto è possibile scrivere un file esistente da zero cancellando i vecchi dati o aggiungendo semplicemente nuove righe a quelle già presenti. Nello script qui sopra analizzato il codice viene riscritto da zero, in quanto abbiamo impostato ForWriting, scegliendo invece ForAppending avremo semplicemente aggiunto le righe:

Ciao Matteo

sono Lorenzo

a quelle già esistenti.