FileSearch Problem

[Bin]

I am using a macro with FileSearch in both office and
home computers. It works perfect in my office, but not
work at home. The problem is in FileSearch. The code is
as follow:

With Application.FileSearch
.NewSearch
.LookIn = FilePath
.FileName = SumBookName
.FileType = msoFileTypeExcelWorkbooks
.MatchTextExactly = True
If .Execute() > 0 Then
For i = 1 To .FoundFiles.Count
If .FoundFiles(i) = FilePath +
SumBookName Then
FileExist = True
Exit For
End If
Next i
Else
FileExist = False
End If
End With

By using debug.print, I found Execue() is 0.
I am using same Excel 2002 at my office and home but at
differnt OS. Office is Windows2K, home is WinXP. What is
the problem? Anybody can help me?

 

[Don Guillett]

try commenting out
.FileType = msoFileTypeExcelWorkbooks
and/or put " " around sumbookname
.FileName = SumBookName

 

[Bin]

I am sorry. It doesn't work.
SumBookName is an variable, can not pu "" around it.
I deleted FileType code, but it still doesn't work.
What can I do else?
Thanks.

Bin

 

[Don Guillett]

try it using a real file name like
thisismyfile.xls

 

[Bin]

Sorry. I can not use a real file name. It is input by
user. Since I am using the same Excel 2002, same CD, for
both computers with different OS, is it OS problem?

 

[Don Guillett]

May be.

 

[Dave Peterson]

There have been lots of posts that say that .filesearch is flakey in xl2002.
And some posts that say it's even worse under winXP.