<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=iso-8859-1">
<META content="MSHTML 6.00.2600.0" name=GENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=#ffffff>
<DIV><STRONG>Mark,</STRONG></DIV>
<DIV> </DIV>
<DIV>In Access 2002, you can also try FileDialog Object. The code given below
will display a dialog box for File Selection. Based upon user's choice, the
variable TargetFile will give Full Path of each Selected File.
<DIV> </DIV>
<DIV>-------------</DIV>
<DIV>Code Start</DIV>
<DIV>-------------</DIV>
<DIV>Dim fdg as Object, TargetFile As String</DIV>
<DIV>Dim SLF As Variant</DIV>
<DIV> </DIV>
<DIV>Set fdg = Application.FileDialog(3)<BR>' Arguments -
1(FileOpen), 2(FileSaveAs), 3(FilePicker), 4(FolderPicker)</DIV>
<DIV> </DIV>
<DIV>With fdg<BR> .Title = Space(71) & "Select
Source Files"<BR> .AllowMultiSelect = True</DIV>
<DIV> If .Show <> 0 Then</DIV>
<DIV> For Each SLF In
.selecteditems<BR>
TargetFile = Trim(SLF)</DIV>
<DIV>' Note - Take Suitable Action Here On
TargetFile<BR> Next<BR>
End If ' Show<BR>End
With ' fdg</DIV>
<DIV>-------------</DIV>
<DIV>Code End</DIV>
<DIV>-------------</DIV>
<DIV> </DIV>
<DIV>Regards,</DIV>
<DIV><STRONG>A.D.Tejpal</STRONG></DIV>
<DIV><STRONG>----------------------------</STRONG></DIV></DIV>
<BLOCKQUOTE
style="PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">
<DIV style="FONT: 10pt arial">----- Original Message ----- </DIV>
<DIV
style="BACKGROUND: #e4e4e4; FONT: 10pt arial; font-color: black"><B>From:</B>
<A title=stuart@lexacorp.com.pg href="mailto:stuart@lexacorp.com.pg">Stuart
McLachlan</A> </DIV>
<DIV style="FONT: 10pt arial"><B>To:</B> <A title=markH@bitgen.co.uk
href="mailto:markH@bitgen.co.uk">MarkH</A> ; <A
title=accessd@databaseadvisors.com
href="mailto:accessd@databaseadvisors.com">accessd@databaseadvisors.com</A>
</DIV>
<DIV style="FONT: 10pt arial"><B>Sent:</B> Friday, May 02, 2003 04:07</DIV>
<DIV style="FONT: 10pt arial"><B>Subject:</B> RE: [AccessD] Open File Dialog -
multiple selections One More SimpleQuestion</DIV>
<DIV><BR></DIV><BR>In the example I gave, was " OpenFile.lpstrFile
= String(257, 0)"<BR>That is large enough for a single file, you will need to
enlarge it <BR>for multiple files.<BR><BR>On 1 May 2003 at 14:59, MarkH
wrote:<BR><BR>> Hi again...<BR>> <BR>> I got the dialog working fine,
BUT... If I select more than a handful<BR>> of files then nothing gets
returned.<BR>> <BR>> Is there a limit?<BR>> <BR>> In some cases I
may be looking to select 50 or 60 files at a time...<BR>> <BR>> Thanks
again<BR>> <BR>> Mark<BR></BLOCKQUOTE></BODY></HTML>