Differenze tra le versioni di "Estrarre da una cartella uno o più file nascosti"
Da Gambas-it.org - Wikipedia.
(Una versione intermedia di uno stesso utente non è mostrata) | |||
Riga 1: | Riga 1: | ||
I file nascosti sono riconoscibili dal fatto che al proprio nome è anteposto un punto: '''''.'''nomefile'' | I file nascosti sono riconoscibili dal fatto che al proprio nome è anteposto un punto: '''''.'''nomefile'' | ||
− | Per estrarre il nome dei file nascosti da una cartella, potrà essere utilizzato il seguente codice con la funzione "Dir()" e il filtro <FONT color=#B22222> | + | Per estrarre il nome dei file nascosti da una cartella, potrà essere utilizzato il seguente codice con la funzione "Dir()" e il filtro "<FONT color=#B22222>'''.*'''</font>" : |
'''Public''' Sub Button1_Click() | '''Public''' Sub Button1_Click() | ||
Dim nomefile As String | Dim nomefile As String | ||
− | For Each nomefile In Dir("<FONT Color=gray>''/percorso/della/cartella''</font>", <FONT color=#B22222> | + | For Each nomefile In Dir("<FONT Color=gray>''/percorso/della/cartella''</font>", "<FONT color=#B22222><B>.*</b></font>") <SUP>[[[#Note|Nota 1]]]</sup> |
Print nomefile | Print nomefile | ||
Next | Next |
Versione attuale delle 20:16, 5 set 2022
I file nascosti sono riconoscibili dal fatto che al proprio nome è anteposto un punto: .nomefile
Per estrarre il nome dei file nascosti da una cartella, potrà essere utilizzato il seguente codice con la funzione "Dir()" e il filtro ".*" :
Public Sub Button1_Click() Dim nomefile As String For Each nomefile In Dir("/percorso/della/cartella", ".*") [Nota 1] Print nomefile Next End
Note
[1] L'utente sotema del forum di Gambas-it.org suggerisce anche questo altro filtro: "[!^.]*"