ComDialog til åbning af mapper

Jeppper er der....
Den hedder DirListBox :O)

Og den kan kombineres med FileListBox hvis det er......

Lav en textbox og en dirlistbox
og følgende kode, så skriver den dir i textboxen ved klik....

Private Sub Dir1_Change()
Text1.Text = Dir1.Path
End Sub

Vil du skifte drev skal den kombineres med : DriveListBox

/Tubber

Her er et eks. på hvordan de arbejder sammen......

4 Textboxe
1 DriveListBox
1 DirListBox
1 FileListBox

'Kode

'Fortæller DirListBoxen hvad drev den skal liste fra
Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub

'Fortæller hvad dir FileListBoxen skal vise filer fra
Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub

'Fortæller hvad der skal stå i de forskellige textboxe
Private Sub File1_Click()

'Skriver drev bogstav og drevnavn
Text1.Text = Drive1.Drive

'Skriver Path til det dir filerne listes fra
Text2.Text = Dir1.Path

'Skriver Filnavn
Text3.Text = File1.FileName

'Skriver Absolut sti til filnavn
Text4.Text = Dir1.Path & "\" & File1.FileName
End Sub

okay de vidste jeg godt man kunne bruge... men jeg troede måske der var en standard diaglog box

det var nok noget i stil med "open/save/browse" diaglog box

(API)
http://hjem.get2net.dk/sjh/eksperten/OSB.zip

sjh:

Damn den har jeg ledt længe efter......
Har altid lavet den selv, sådan som jeg forklarede.....
Men med den der du giver kan brugeren vel ikke vælge en mappe ? vælger man en mappe og trykker open så åbner den vel vidre ind i mappen ?

Men jeg vil da godt give 50 points for den zip fil :O)