Rocky Smolin - Beach Access Software
bchacc at san.rr.com
Tue May 20 11:52:45 CDT 2003
Roz: Did you change the line which limits the retrieved files to .jpg extensions? .FileName = "*.jpg" Rocky ----- Original Message ----- From: "Roz Clarke" <roz.clarke at donnslaw.co.uk> To: <accessd at databaseadvisors.com> Sent: Tuesday, May 20, 2003 8:56 AM Subject: RE: [AccessD] Grab Filenames > Well I'm running Office XP on WXP w/ Service Pack 1. > > I can't think of any specific settings which would lead to the exclusion of > the particular databases I'm missing :( > > Roz > > -----Original Message----- > From: Charlotte Foust [mailto:cfoust at infostatsystems.com] > Sent: 20 May 2003 16:48 > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] Grab Filenames > > > That's interesting, Roz. I just pulled your code out, changed the path to > point to a folder on my machine with mdbs in it, and got a zero for the > FoundFiles count. And I had the same problem with Rocky's sample database. > It has to be a setting that is causing the failures some of us are > experiencing. Now, if we could just figure out what it is ... :o{ > > Rocky, any suggestions? > > Charlotte Foust > > -----Original Message----- > From: Roz Clarke [mailto:roz.clarke at donnslaw.co.uk] > Sent: Tuesday, May 20, 2003 7:27 AM > To: 'accessd at databaseadvisors.com' > Subject: [AccessD] Grab Filenames > > > > Hmm. I ran a variation of Charlotte's code (informed by Rocky's, but > Charlotte's was closer to what I think I want) that looks like this: > > Dim varItem As Variant > With Application.FileSearch > .NewSearch > .SearchSubFolders = True > .FileName = "*.mdb" > .LookIn = "G:\" > .Execute > 'Debug.Print .FoundFiles.Count > DoCmd.SetWarnings False > For Each varItem In .FoundFiles > strSQL = "INSERT INTO tblFiles (FileInfo) VALUES ( '" & varItem & "' > )" > 'Debug.Print strSQL > DoCmd.RunSQL strSQL > Next varItem > End With > > This gets me the filepath, with name, though not the file size or any date > info. But that's fine, I can live with that. > > What's baffling me is that the above drive has 280 .mdb files on it (yes, I > know that's ridiculous, which is the point of the exercise) but the > .FoundFiles.count only returns 152. It doesn't seem to have looked in any > sub folders beginning with 'R'. Is this the sort of whacky behaviour you > guys have experienced?! > > Roz > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: 20 May 2003 15:21 > To: Roz Clarke > Subject: Re: Your last E-Mail to donnslaw.co.uk was corrupt of unreadable. > Find Files db > > > Was curious about the code. Standing by... > > Rocky > > ----- Original Message ----- > From: "Roz Clarke" <roz.clarke at donnslaw.co.uk> > To: "'Rocky Smolin - Beach Access Software'" <bchacc at san.rr.com> > Sent: Tuesday, May 20, 2003 6:32 AM > Subject: RE: Your last E-Mail to donnslaw.co.uk was corrupt of unreadable. > Find Files db > > > > The email or the code? > > > > I got the zip file but I haven't had a chance to try the code out yet > > - spent all day so far on a really nasty bit of data conversion and > > now have > a > > stack of support jobs to do. *sigh* > > > > I'll let you know! > > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > Sent: 20 May 2003 14:20 > > To: Roz Clarke > > Subject: Re: Your last E-Mail to donnslaw.co.uk was corrupt of > > unreadable. Find Files db > > > > > > did it work? > > > > ----- Original Message ----- > > From: "Roz Clarke" <roz.clarke at donnslaw.co.uk> > > To: "'Rocky Smolin - Beach Access Software'" <bchacc at san.rr.com> > > Sent: Tuesday, May 20, 2003 1:00 AM > > Subject: RE: Your last E-Mail to donnslaw.co.uk was corrupt of > > unreadable. Find Files db > > > > > > > cheers > > > > > > -----Original Message----- > > > From: Rocky Smolin - Beach Access Software > > > [mailto:bchacc at san.rr.com] > > > Sent: 19 May 2003 17:26 > > > To: Roz Clarke > > > Subject: Re: Your last E-Mail to donnslaw.co.uk was corrupt of > > > unreadable. Find Files db > > > > > > > > > Just sent it. Note in the code that I'm only grabbing files with a > > > .jpg extension. But you can change that to whatever you want. > > > > > > Rocky > > > > > > ----- Original Message ----- > > > From: "Roz Clarke" <roz.clarke at donnslaw.co.uk> > > > To: "'Rocky Smolin - Beach Access Software'" <bchacc at san.rr.com> > > > Sent: Monday, May 19, 2003 9:11 AM > > > Subject: RE: Your last E-Mail to donnslaw.co.uk was corrupt of > unreadable. > > > Find Files db > > > > > > > > > > I should get zip files OK... Will have to slap our notwork guys > > > > > > > > > > > > Try zora_db at yahoo.com > > > > > > > > -----Original Message----- > > > > From: Rocky Smolin - Beach Access Software > > > > [mailto:bchacc at san.rr.com] > > > > Sent: 19 May 2003 17:10 > > > > To: Roz Clarke > > > > Subject: Fw: Your last E-Mail to donnslaw.co.uk was corrupt of > > > > unreadable. Find Files db > > > > > > > > > > > > Roz: > > > > > > > > Apparently I can't send either MDB or ZIP attachments. :( > > > > > > > > Do you have another email address that might let these go through? > > > > > > > > Rocky > > > > > > > > ----- Original Message ----- > > > > From: "Internet Manager Message Inspector" > > > > <ted.walsh at donnslaw.co.uk> > > > > To: <bchacc at san.rr.com> > > > > Sent: Monday, May 19, 2003 9:08 AM > > > > Subject: Your last E-Mail to donnslaw.co.uk was corrupt of > > > > unreadable. > > > Find > > > > Files db > > > > > > > > > > > > > The message you sent does not conform with our company > > > > > electronic communications policy. > > > > > > > > > > > > > > > > > > > > Your message was entitled: Find Files db > > > > > It was addressed to: roz.clarke at donnslaw.co.uk > > > > > and dated: Mon, 19 May 2003 09:08:13 -0700 > > > > > From IP: 66.75.160.17 > > > > > > > > > > The message was redirected for later inspection. > > > > > > > > > > > > > > > > > > > > > > > > > _______________________________________________ > 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 > _______________________________________________ > 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