Differenze tra le versioni di "Open"

Da Gambas-it.org - Wikipedia.
 
(5 versioni intermedie di uno stesso utente non sono mostrate)
Riga 6: Riga 6:
  
  
Esempio:
+
===Esempi===
 +
Esempio pratico di creazione e di contestuale apertura di un file in ''Scrittura'' mediante la parola-chiave "'''Create'''":
 
  Public Sub Main()
 
  Public Sub Main()
 
   
 
   
 
   dim fl As File
 
   dim fl As File
 
   
 
   
   <FONT Color=B22222><B>Open</b></font> "<FONT Color=gray>''/percorso/del/file/da/aprire''</font>" For Create  <FONT Color=gray>' ''Crea un nuovo file ''</font>
+
<FONT Color=gray>' ''Crea un nuovo file in "Scrittura":''</font>
 +
   fl = <FONT Color=B22222><B>Open</b></font> "<FONT Color=gray>''/percorso/del/file/da/creare/e/da/aprire''</font>" For <FONT Color=darkgreen>Create</font>
 
   
 
   
 +
<FONT Color=gray>' ''Scrive un valore numerico del tipo di dati "Short" nel file appena creato''</font>
 
   Write #fl, 12345 As Short
 
   Write #fl, 12345 As Short
 
   
 
   
 +
<FONT Color=gray>' ''Chiude il file, impedendone ogni ulteriore scrittura di dati''</font>
 
   Close #fl
 
   Close #fl
 
   
 
   
 
  End
 
  End
 +
Esempio pratico di apertura in ''Scrittura'' mediante la parola-chiave "'''Write'''" di un file già esistente:
 +
<FONT Color=gray>' ''Apre in "Scrittura" un file già esistente:''</font>
 +
  fl = <FONT Color=B22222><B>Open</b></font> "<FONT Color=gray>''/percorso/del/file/da/aprire''</font>" For <FONT Color=darkgreen>Write</font>
 +
 +
<FONT Color=gray>' ''Scrive un valore numerico del tipo di dati "Short" nel file:''</font>
 +
  Write #fl, 12345 As Short
 +
 +
<FONT Color=gray>' ''Chiude il file, impedendone ogni ulteriore scrittura di dati''</font>
 +
  Close #fl
 +
Esempio pratico di apertura in ''Scrittura'' mediante le parole-chiave "'''Write Append'''" di un file già esistente per <SPAN Style="text-decoration:underline">aggiungervi ulteriori dati</span>:
 +
  fl = <FONT Color=B22222><B>Open</b></font> "<FONT Color=gray>''/percorso/del/file/da/aprire/e/al/quale/'''aggiungere'''/dati''</font>" For <FONT Color=darkgreen>Write '''Append'''</font>
 +
 +
<FONT Color=gray>' ''Scrive un valore numerico del tipo di dati "Short" nel file:''</font>
 +
  Write #fl, 12345 As Short
 +
 +
<FONT Color=gray>' ''Chiude il file, impedendone ogni ulteriore scrittura di dati:''</font>
 +
  Close #fl
 +
Esempio pratico di apertura in ''Lettura'' mediante la parola-chiave "'''Read'''" di un file:
 +
  Dim c As Short
 +
 +
  <FONT Color=gray>' ''Apre in "Lettura" un file già esistente:''</font>
 +
  fl = <FONT Color=B22222><B>Open</b></font> "<FONT Color=gray>''/percorso/del/file/da/aprire''</font>" For <FONT Color=darkgreen>Read</font>
 +
 +
<FONT Color=gray>' ''Legge un valore numerico del tipo di dati "Short" dal file e lo assegna alla variabile "c":''</font>
 +
  Read #fl, c
 +
 +
<FONT Color=gray>' ''Chiude il file, impedendone ogni ulteriore lettura di dati''</font>
 +
  Close #fl

Versione attuale delle 10:39, 22 giu 2023

OPEN apre un file per la "lettura" e/o per la "scrittura" e ritorna una variabile di tipo File.

La sua sintassi è:

Open "/percorso/del/file/da/aprire" For [Read | Input][Write | Output][Create][Append][Watch] As File

Va ricordato che un file, dopo essere stato aperto, al termine delle operazioni va chiuso con la funzione "Close" oppure con il Metodo ".Close()" dell'Oggetto File ritornato.


Esempi

Esempio pratico di creazione e di contestuale apertura di un file in Scrittura mediante la parola-chiave "Create":

Public Sub Main()

 dim fl As File

' Crea un nuovo file in "Scrittura":
 fl = Open "/percorso/del/file/da/creare/e/da/aprire" For Create

' Scrive un valore numerico del tipo di dati "Short" nel file appena creato
 Write #fl, 12345 As Short

' Chiude il file, impedendone ogni ulteriore scrittura di dati
 Close #fl

End

Esempio pratico di apertura in Scrittura mediante la parola-chiave "Write" di un file già esistente:

' Apre in "Scrittura" un file già esistente:
 fl = Open "/percorso/del/file/da/aprire" For Write

' Scrive un valore numerico del tipo di dati "Short" nel file:
 Write #fl, 12345 As Short

' Chiude il file, impedendone ogni ulteriore scrittura di dati
 Close #fl

Esempio pratico di apertura in Scrittura mediante le parole-chiave "Write Append" di un file già esistente per aggiungervi ulteriori dati:

 fl = Open "/percorso/del/file/da/aprire/e/al/quale/aggiungere/dati" For Write Append

' Scrive un valore numerico del tipo di dati "Short" nel file:
 Write #fl, 12345 As Short

' Chiude il file, impedendone ogni ulteriore scrittura di dati:
 Close #fl

Esempio pratico di apertura in Lettura mediante la parola-chiave "Read" di un file:

 Dim c As Short

 ' Apre in "Lettura" un file già esistente:
 fl = Open "/percorso/del/file/da/aprire" For Read

' Legge un valore numerico del tipo di dati "Short" dal file e lo assegna alla variabile "c":
 Read #fl, c

' Chiude il file, impedendone ogni ulteriore lettura di dati
 Close #fl