Output To
L'istruzione Output To redirige l'uscita, ossia lo standard output, predefinita in un altro flusso.
L'uscita predefinita viene usata da PRINT e WRITE, quando non gli vengono specificati argomenti specifici.
Nell'esempio seguente la scrittura del testo, contenuto dalla variabile di tipo Stringa, sarà reindirizzato dalla console/terminale verso un file.
Public Sub Main() Dim fl As File Dim s As String s = "testo qualsiasi" fl = Open "/percorso/del/file/da/scrivere" For Create ' Si impone che il flusso di dati sarà reindirizzato dalla console/terminale al file "fl": Output To #fl ' Quindi l'istruzione "Print" scrive nel file "fl", anziché, come sarebbe qui previsto, nella console: Print s fl.Close End
In quest'altro esempio leggiamo da un file, contenente un valore di tipo Long, e creiamo un nuovo file, nel quale scriveremo quanto letto dal primo file:
Public Sub Main() Dim st, fl As File Dim l As Long st = Open "/percorso/del/file/da/leggere" For Read fl = Open "/percorso/del/file/da/scrivere" For Create ' Legge il valore di tipo "Long": Read #st, l ' Si impone che il flusso di dati sarà reindirizzato dalla console al file "fl": Output To #fl ' Quindi l'istruzione "Write" scrive nel file "fl", anziché, come sarebbe qui previsto, nella console: Write l As Long fl.Close st.Close End
La stampa del risultato non avverrà più in console/terminale, ma i dati saranno rediretti nella variabile "fl" che punta al file da scrivere. [nota 1]
Note
[1] Un esempio pratico può essere visto in questa pagina: Indirizzare dati ad un Terminale ed alla Console dell'IDE di Gambas.
