| Forum: Visual Basic |
Thema:
Re: Datei-Verzeichnis (Folder) auflisten aus einem Word-UserForm |
Von:
G. Guest (
19.06.2003 14:46) |
Hier ein Codeschnipsel der das tun sollte.
Gruss
A.W.
'Einlesen der Ordner in die Listbox
dim sDatei as String
sDatei = Dir(Bausteinpfad, vbDirectory)
Do While sDatei <> ""
'Nur benannte Ordner (nicht . oder ..)
If Left(sDatei, 1) <> "." And (GetAttr(Bsuteinpfad & "\" & sDatei) And vbDirectory) = vbDirectory Then
lstOrdner.AddItem sDatei
End If
sDatei = Dir
Loop
Antworten
Vorsicht bei der Eingabe: Die Zeichen ' oder -- sind nicht erlaubt!
