Differenze tra le versioni di "Leggere in una cartella con le sole risorse di Gambas"

Da Gambas-it.org - Wikipedia.
 
Riga 19: Riga 19:
 
   Dim s As String
 
   Dim s As String
 
    
 
    
   For Each s In Dir("<FONT color=gray>''/percorso/della/cartella''</font>", "*.png", gb.File)
+
   For Each s In Dir("<FONT color=darkgreen>''/percorso/della/cartella''</font>", "*.png", gb.File)
 
     Print s
 
     Print s
 
   Next
 
   Next
 
   
 
   
 
  End
 
  End

Versione attuale delle 15:58, 24 giu 2024

Per leggere il contenuto di una Cartella, non è possibile usare la funzione OPEN. Si dovrà adoperare la funzione specifica Dir.

Mostriamo un paio di esempi pratici con le sole risorse di Gambas.

Lettura all'interno della directory /proc per conoscere soltanto quali altre cartelle sono in essa presenti:

Public Sub Main()

 Dim s As String

' Leggiamo all'interno della cartella "/proc" soltanto le sue sub-cartelle presenti:
 For Each s In Dir("/proc", "*", gb.Directory)
   Print s
 Next

End

Lettura all'interno di una cartella per conoscere il nome dei soli file avente estensione .png:

Public Sub Main()

 Dim s As String
 
 For Each s In Dir("/percorso/della/cartella", "*.png", gb.File)
   Print s
 Next

End