Differenze tra le versioni di "Estrarre da una cartella uno o più file nascosti"
Da Gambas-it.org - Wikipedia.
Riga 3: | Riga 3: | ||
Per estrarre il nome dei file nascosti da una cartella, potrà essere utilizzato il seguente codice con la funzione ''Dir'' e il filtro ''".*"'' : | 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() | '''Public''' Sub Button1_Click() | ||
− | |||
− | |||
− | |||
− | |||
− | + | Dim nomefile As String | |
− | + | ||
− | Next | + | For Each nomefile In Dir("<FONT Color=gray>''/percorso/della/cartella''</font>", <FONT color=#B22222>".*"</font>) <SUP>[[[#Note|Nota 1]]]</sup> |
− | + | Print nomefile | |
+ | Next | ||
+ | |||
'''End''' | '''End''' | ||
− | |||
− | + | =Note= | |
[1] L'utente ''sotema'' del forum di Gambas-it.org suggerisce anche questo altro filtro: <FONT color=#B22222>"[!^.]*"</font> | [1] L'utente ''sotema'' del forum di Gambas-it.org suggerisce anche questo altro filtro: <FONT color=#B22222>"[!^.]*"</font> |
Versione delle 20:12, 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: "[!^.]*"