FileDialog vs API and Multi-Select

T

Troy

Hello All,

I need the functionality of the FileDialog (only in OLB 10.0) in Access
2000 (only OLB 9.0). I have seen the great code to call the OpenFile API and
have gotten it to work. Problem is I cannot multi-select like I can by using
FileDialog.

Question, can I either A)Get Filedialog Functionality in Access 2000 or
B)Get Multi-Select Functionality via the API.

Here is the code in Access 2002 that works that I need to replicate the
ability in Access 2000. Frequently this module imports 50+ different
spreadsheet files so you can see why not having multi-select is a pain.

Sub ImportSurvey()
Dim MyFiles As FileDialog

Set MyFiles = Application.FileDialog(msoFileDialogFilePicker)
MyFiles.Show

For Each Item In MyFiles.SelectedItems
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9,
"Functions", Item, True, "FunctionData"
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9,
"ProcessApplications", Item, True, "ApplicationData"
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9,
"Dependencies", Item, True, "DependencyData"
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9,
"Processes", Item, True, "ProcessData"
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9,
"Intangibles", Item, True, "IntangibleData"
MsgBox Item & " Imported"
Next Item

End Sub
 
D

Douglas J. Steele

Already answered in another newsgroup to which you posted the same question.

If you feel you need to post to more than one group (HINT: it's seldom
necessary), please have the courtesy to cross-post (send the one message to
all groups at once), rather than multi-post (send individual messages to
each group). In this way, all responses to your post will be available
together, regardless of what group the responder was in, and the rest of us
won't have to read your post multiple times. (It also uses fewer server
resources)

If you're using Microsoft's web interface to post, you should see an
"Advanced Options" link at the bottom of the page. You can type the names of
the various groups into the Newsgroup box, separating each newsgroup name
with a semicolon.

Note that it's generally consider to be A Bad Thing to cross-post to more
than about 2 or 3 newsgroups. (In fact, at
http://www.microsoft.com/presspass/features/2001/Mar01/Mar27pmvp.asp
Microsoft suggests that "One group will suffice")
 
T

Troy

Doug, thanks for the input. Didn't know about cross-posting, and was unsure
where the question. Sorry if I offended anyone.
 

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

Top