FileSearch Problem

[Mark]

Hi,
Can anyone please tell me why the following code works fine in
Win98/Access97, but fails to recognize files with a ".zip" extension in
WinXP/Access2002/2000? It correctly lists the name of each ".txt" file in
the folder.

....................
With Application.FileSearch
..FileName = "*.*"
..LookIn = "C:\_PriorAuth"
..SearchSubFolders = False
..Execute
For Each varItem In .FoundFiles
Debug.Print varItem
Next varItem
End With
......................

Thank you,
Mark

 

[Mark]

I found a reference to this problem in the Google Access newsgroup. It
appears that Access XP has problems with wildcards when using FileSearch.
But why it'll return the name of any text files, but not zip files, I don't
know.

I guess I can use Dir to populate a Temp table and then use that to supply
FileSearch with actual file names -- in order to get file size, etc.

If anyone has a better answer, please let me know.
Mark.