Setting CurDir with a Windows File Open dialog box

P

Patrick

How can CurDir be set by using a regualar Windows Open dialog box?

For file selection I'm using the File Open dialog code from:
http://www.mvps.org/access/api/api0001.htm, but this only allows selection of
files.

I want a dialog box for the user to select a folder and use the result to
set CurDir.
After that I populate a listbox with:

Dim StuffToFind, FoundStuff As String
StuffToFind = CurDir & "\*.cls"
FoundStuff = Dir(StuffToFind)
Do While FoundStuff <> ""
List1.AddItem (FoundStuff)
FoundStuff = Dir
Loop

How can I set CurDir with a dialog box?
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Show the file open dialog displaying a specified location 1
File Properties in Word Open File Dialog Box 0
change curdir to a folder on a network 2
Open dialog box. 1
Open dialog box. 6
FileDialog(msoFileDialogFolderPicker) not using the current direct 1
FileOpen with a specific location 1
Show FileOpen with a specified location 3

Top