Direcrories scannen

[jvsoest]

Hoi,
Ik zoek VB(A)-code waarmee ik directories kan scannen op alle subdirectories en alle subdirectores daaronder enz. Ik wil dus een lijst maken met daarin de namen van alle subdirectories onder een bepaalde directorie, geen bestanden.

Bedankt alvast voor tips,code enz.

 

[Axel Hagg]

Mappen

Kijk bij Help onder FileSystemObject


With CreateObject("Scripting.FileSystemObject")
For Each f In .drives
MsgBox f.Path of f.Name
Next
End With