Replace Application.Filesearch

I have old access code for application.filesearch that no longer works in my current 2010 version.  The code looks in the current directory and subfolders and writes the path and file names of all JPEGs into a table.  I am ok with the SQL insert but cannot find a replacement that will work for application.filesearch that loops through the directory.  Any help would be appreciated.