<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD><TITLE>Message</TITLE>
<META http-equiv=Content-Type content="text/html; charset=us-ascii">
<META content="MSHTML 6.00.2800.1170" name=GENERATOR></HEAD>
<BODY>
<DIV><SPAN class=910080015-19052003><FONT face="Comic Sans MS" color=#0000ff
size=2>I think you'd have to do it with a FileSearch and write the results of
each FoundFiles item into the table. Here's a FileSearch
sample.</FONT></SPAN></DIV>
<DIV><SPAN class=910080015-19052003><FONT face="Comic Sans MS" color=#0000ff
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=910080015-19052003><FONT face="Comic Sans MS" color=#0000ff
size=2>Sub SimpleSearch()<BR> 'Perform simple search using the FileSearch
object,\.<BR> Dim varItem as Variant<BR> With
Application.Filesearch<BR> .NewSearch<BR>
.FileName = "*.ini"<BR> .LookIn =
"C:\Windows"<BR> .Execute<BR> For Each
varItem in .foundFiles<BR> Debug.print
varItem<BR> Next varItem<BR> End With<BR>End
Sub</FONT></SPAN></DIV>
<DIV><SPAN class=910080015-19052003><FONT face="Comic Sans MS" color=#0000ff
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=910080015-19052003><FONT face="Comic Sans MS" color=#0000ff
size=2>Charlotte Foust</FONT></SPAN></DIV>
<BLOCKQUOTE dir=ltr style="MARGIN-RIGHT: 0px">
<DIV></DIV>
<DIV class=OutlookMessageHeader lang=en-us dir=ltr align=left><FONT
face=Tahoma size=2>-----Original Message-----<BR><B>From:</B> Roz Clarke
[mailto:roz.clarke@donnslaw.co.uk] <BR><B>Sent:</B> Monday, May 19, 2003 6:54
AM<BR><B>To:</B> 'accessd@databaseadvisors.com'<BR><B>Subject:</B> [AccessD]
Grab filenames<BR><BR></FONT></DIV>
<P><FONT face=Arial size=2>Hi all</FONT> </P>
<P><FONT face=Arial size=2>Does anyone have a code snippet for pulling file
search results into Access?</FONT> </P>
<P><FONT face=Arial size=2>What I want is to pull the filename, path &
size of all files of a given type on a particular drive, including those in
subfolders, into a table. I need to do it *fast*!!!</FONT></P>
<P><FONT face=Arial size=2>TIA</FONT> </P>
<P><FONT face=Arial size=2>Roz</FONT> </P></BLOCKQUOTE></BODY></HTML>