Ricerca su directory |
|
| Storico
discussioni |
|
| Ricerca file in una directory
di jjresti |
Vorrei fare una ricerca dei file in una directory e
visualizzarli in una list box, ho trovato un sacco di procedure in
rete, ma nessuna mi funziona! Suggerimenti?
With
Application.FileSearch
.NewSearch
.LookIn = "C:\backup"
.Filename = "*.*"
If .Execute() > 0 Then
MsgBox "E
vaiii!!!!"
End If
End With
|
|
| di Mauro |
La routine seguente fa una ricerca dei file nella
directory backup ed inserisce il risultato nella ListBox.
Sub
prova()
MyPath = "C:\backup\*.*"
MyName = Dir(MyPath,
vbNormal)
Do While MyName <> ""
ListBox1.AddItem
MyName
MyName = Dir
Loop
End Sub |
|
| |