Fast VBA code that searches for files created after given date/time

[cravincreeks]

Hello all. I'm seeking a fast routine that will list all files (by file name) in a given directory that were created after a particular date and time.

This will be run in ESRI's ArcGIS and that software has its own 'Application' object. Consequently, it could get tricky if I attempt to use the MS Office FileSearch object. For example, if I try to write

Dim fs as Object
Set fs = Application.FileSearch

then I get an error saying that the object does not support the method or property.

The number of files in the directory that I want to search will soon be huge (thousands of files), so I'm hoping that I can find some code that is very fast.

Thanks!

 

[PHV]

Why not using FileSystemObject ?

http://msdn.microsoft.com/library/en-us/script56/html/af4423b2-4ee8-41d6-a704-49926cd4d2e8.asp

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886

 

[cravincreeks]

Thanks for your reply. I heard the FSO is slow. (see

http://www.tek-tips.com/viewthread.cfm?qid=1260861&page=1)

Do you agree?

 

[taupirho]

I'm probably being stupid here but could you do a DOS command, something like:- dir/tc/od | find /V "<DIR>" | find /V "Directory of" | find ":" > somefilename (this can be done in vba via the shell command). This will give you a list of date ordered files in somefilename. Then you do a quick parse of somefilename in VBA using FSO or whatever to get the ones you wanted. You might have to tweak the find commands to cope with other situations but if you get it right it could be pretty quick.