I have been trying to build a search routine that will open the inbox and
cycle through the body of each message looking for a string that I define
using wild cards and the Like operator.

Here is the code snippet:

------------------------
Do While n filecount
Set myitem1 = myFolder.Items(n) 'iterate through items in inbox

' send (myitem1) to a string search
Dim objSch As Search 'name of the search obj result
Const strF As String = "myItem1.body" Like "*@*" 'the actual search
string
Const strS As String = "myItem1" 'where to look for the search string
Const strTag As String = "AddressSearch" 'search name tag

'On Error Resume Next
Set objSch = Application.AdvancedSearch(Scope:=strS, Filter:=strF,
Tag:=strTag)

--------------

Can't get this advancedSearch to run; get automation errors. suspect that
the search string is tripping up the search call.

Can you suggest anything? Is is OK to use the Like operator in
advancedSearch?