file search via macro

[Christian22]

hi,

I have a new problem.
Now I need a macro, which search for some files (I already have the filenames ). I only need the commands to find these files. - I'm using Microsoft Project 98.

Thx

 

[PDQBach]

The VB command you're looking for is DIR.

You'll need to set up two loops, one recursive loop to traverse the directory structure and one non-recursive one to sequentially test each filename.

looper_dir startingpath


sub looper_dir (stpath)

for each item in the stpath
If the item is a sub-directory then
looper_dir (stpath & "\" & sub-directoryname)
else
if the item is a file and filename is a match then
store path and filename, date, size in array
end if
end if
next

end sub

Since the same name can be used on multiple files stored in multiple locations, you'll need to check the array contents when you exit to determine if you found the file and, if found, which one you'll use. And, of course, you'll also need a check to determine if you found all files.

Since you could be on a machine on a network you'll have to consider various drives and you'll have to handle a variety of error conditions if you don't have access privs to the drives and/or folders.

 

[Christian22]

Thanks for help.
Now my macro works correctly.

 

[PDQBach]

Glad I could help. Perhaps you might consider posting it here so that others can learn from your experiences.