Lijst maken van Subfolders maken

[pvdlee]

Ik heb Access 2003
Ik zou graag met VBA een lijst krijgen in een file of tabel van alle submappen binnen een hoofdmap

Peter

 

[OctaFish]

Dat moet je even wat uitleggen.

 

[pvdlee]

Ik wil net zo als je in Dos kon, zoiets als
dir /a:d \temp >>files.txt

(dat lachebekje is dubbelepunt d)
dan krijg ik alleen de mapnamen in het bestandje files.txt

 

[OctaFish]

Maar wat heeft dat met Access te maken? Overigens kan je met DIR een map uitlezen, dus in die richting ligt een antwoord...

 

[pvdlee]

Voor zover ik weet kan je met VBA in Access met dir alleen maar bestanden controleren
Kan je er ook een voorbeeld van geven, want ik ben niet zo'n VBA deskundige.

 

[patricw]

In de command box (DOS) doe je dat met:

dir > filename.txt

 

[OctaFish]

@patricw: volgens mij weet TS dat al (lees bericht #3 nog maar eens).

Voor zover ik weet kan je met VBA in Access met dir alleen maar bestanden controleren

Als je de Help opent van het DIR commando, zul je ziet dat je niet alles weet

Sub dirretje()
    MyPath = "c:\"
    MyName = Dir(MyPath, vbDirectory)
    Do While MyName <> ""
        If MyName <> "." And MyName <> ".." Then
            If (GetAttr(MyPath & MyName) And vbDirectory) = vbDirectory Then
                Debug.Print MyName
            End If
        End If
        MyName = Dir
    Loop
End Sub

 

[patricw]

@Octa: dat weet ik maar ik dacht: als ik het dos commando er voor jou neer zet kun jij het omvormen tot VBA

 

[OctaFish]

Dat hoeft dus niet; bovendien heb ik daar niet zo veel aan als je de mappen in een tabel wilt hebben.

 

[pvdlee]

Bedankt hier kom ik wel verder mee!

Peter