[AccessD] Grab Filenames

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




More information about the AccessD mailing list