[AccessD] Grab filenames

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.
 
Sub SimpleSearch()
  'Perform simple search using the FileSearch object,\.
  Dim varItem as Variant
  With Application.Filesearch
    .NewSearch
    .FileName = "*.ini"
    .LookIn = "C:\Windows"
    .Execute
    For Each varItem in .foundFiles
      Debug.print varItem
    Next varItem
  End With
End Sub
 
Charlotte Foust

	-----Original Message-----
	From: Roz Clarke [mailto:roz.clarke at donnslaw.co.uk] 
	Sent: Monday, May 19, 2003 6:54 AM
	To: 'accessd at databaseadvisors.com'
	Subject: [AccessD] Grab filenames
	
	

	Hi all 

	Does anyone have a code snippet for pulling file search results
into Access? 

	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*!!!

	TIA 

	Roz 

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://databaseadvisors.com/pipermail/accessd/attachments/20030519/9dcea141/attachment-0001.html>