Roz Clarke
roz.clarke at donnslaw.co.uk
Wed May 21 03:34:44 CDT 2003
Ye-es
-----Original Message-----
From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com]
Sent: 20 May 2003 17:53
To: accessd at databaseadvisors.com
Subject: Re: [AccessD] Grab Filenames
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
_______________________________________________
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com