Hejsan

hur får jag en DirListbox att visa alla mappar. Även dolda mappar?

Tacksam för ett svar för jag har då inte lyckats :-)

/Emil

Så här får du tag på alla kataloger... vet dock inte hur du visar ett
folderobjekt i dirListen...

Annars kan det vara så att du är tvungen att ändra
systeminformationen för den aktuella katalogen...

//Emma


från MSDN:

Description

Returns a Folders collection consisting of all folders contained in a specified folder, including those with Hidden and System file attributes set.

Syntax

object.SubFolders

The object is always a Folder object.

Remarks

The following code illustrates the use of the SubFolders property:

Sub ShowFolderList(folderspec)
Dim fs, f, f1, s, sf
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFolder(folderspec)
Set sf = f.SubFolders
For Each f1 in sf
s = s & f1.name
s = s & vbCrLf
Next
MsgBox s
End Sub