Mark H
MarkH at bitgen.co.uk
Fri May 2 05:17:06 CDT 2003
Thanks for that... Hadn't realised. What does??? Cheers Mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of William Hindman Sent: 02 May 2003 11:07 To: accessd at databaseadvisors.com Subject: Re: [AccessD] Open File Dialog - multiple selections OneMoreSimpleQuestion ...just keep in mind that the File Dialog Object doesn't work in a runtime app :( William ----- Original Message ----- From: "A.D.Tejpal" <ad_tp at hotmail.com> To: <accessd at databaseadvisors.com> Sent: Friday, May 02, 2003 3:39 AM Subject: Re: [AccessD] Open File Dialog - multiple selections One MoreSimpleQuestion Mark, 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. ------------- Code Start ------------- Dim fdg as Object, TargetFile As String Dim SLF As Variant Set fdg = Application.FileDialog(3) ' Arguments - 1(FileOpen), 2(FileSaveAs), 3(FilePicker), 4(FolderPicker) With fdg .Title = Space(71) & "Select Source Files" .AllowMultiSelect = True If .Show <> 0 Then For Each SLF In .selecteditems TargetFile = Trim(SLF) ' Note - Take Suitable Action Here On TargetFile Next End If ' Show End With ' fdg ------------- Code End ------------- Regards, A.D.Tejpal ---------------------------- ----- Original Message ----- From: Stuart McLachlan To: MarkH ; accessd at databaseadvisors.com Sent: Friday, May 02, 2003 04:07 Subject: RE: [AccessD] Open File Dialog - multiple selections One More SimpleQuestion In the example I gave, was " OpenFile.lpstrFile = String(257, 0)" That is large enough for a single file, you will need to enlarge it for multiple files. On 1 May 2003 at 14:59, MarkH wrote: > Hi again... > > I got the dialog working fine, BUT... If I select more than a handful > of files then nothing gets returned. > > Is there a limit? > > In some cases I may be looking to select 50 or 60 files at a time... > > Thanks again > > Mark ------------------------------------------------------------------------ ---- ---- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --- Incoming mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.449 / Virus Database: 251 - Release Date: 27/01/2003 --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.449 / Virus Database: 251 - Release Date: 27/01/2003