Get the exactly result with Application.FileSearch problem

[softlover]

I use Application.FileSearch codes to find a file in any folder. But the result isn't exactly. See following codes.
With Application.FileSearch
.LookIn = StrDirName
.filename = StrFileName
If .Execute() <= 0 Then
SeekFilesInDir = False
Exit Function
End If
SeekFilesInDir = True
End With
The problem is: I want to search the the file "ABC.txt". But if "ABC123.txt" or "

http://wwwABC.txt"

or other files which name includes the "ABC" string in this folder. The returned variable "SeekFilesInDir" should be "TRUE".
Is there any good codes can solve the problem?

 

[TheAceMan1]

How are ya softlover . . . . .

just need to zero in a bit more. Try this:

[blue]   With Application.FileSearch
      [purple][b].NewSearch[/b][/purple]
      .LookIn = StrDirName
      .FileName = StrFileName
      [purple][b].MatchTextExactly[/b][/purple]
      
      If .Execute() > 0 Then
         SeekFilesInDir = True
      Else
         SeekFilesInDir = False
      End If
 
   End With[/blue]

See Ya! . . . . . .

 

[softlover]

Thanks to TheAceMan1.
The codes you mentioned also can't get the exactly result.
Now I use another codes for search file in any folder.
Private Function SeekFilesInDir(StrPath As String, Optional LngType As Long) As Boolean
On Error Resume Next
SeekFilesInDir = Len(Dir(StrPath, LngType)) > 0
End Function