Loop through directory

  • Thread starter Thread starter Crystal
  • Start date Start date
C

Crystal

I need to loop through a specified directory and write the
filenames and pathnames of all the Access files found
there into a table. Is this possible? If so, how?

Any help would be greatly appreciated,
Crystal
 
Use the Dir function:

Dim strPath As String
Dim strFile As String

strPath = "c:\"
strFile = Dir(MyPath)
Do While Len(strFile) > 0
Debug.Print strFile
strFile = Dir
Loop

I'll leave it to you to figure out what to put instead of Debug.Print to
write the names to a table.
 
Back
Top