Differenze tra le versioni di "Estrarre da una cartella uno o più file nascosti"

Da Gambas-it.org - Wikipedia.
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 ''".*"'' :
 
Per estrarre il nome dei file nascosti da una cartella, potrà essere utilizzato il seguente codice con la funzione ''Dir'' e il filtro ''".*"'' :
Riga 6: Riga 6:
 
   Dim nomefile As String     
 
   Dim nomefile As String     
 
        
 
        
     For Each nomefile In Dir("percorso_cartella", <FONT color=#B22222>".*"</font>) |[[#Note|1]]|
+
     For Each nomefile In Dir("percorso_cartella", <FONT color=#B22222>".*"</font>)
 
   
 
   
 
       Print nomefile   
 
       Print nomefile   
Riga 13: Riga 13:
 
        
 
        
 
  '''End'''
 
  '''End'''
 
 
----
 
 
==Note==
 
[1] L'utente ''sotema'' del forum di Gambas-it.org suggerisce anche questo altro filtro: <FONT color=#B22222>"[!^.]*"</font>
 

Versione delle 03:47, 10 dic 2012

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_cartella", ".*")

     Print nomefile   
 
   Next    
      
End