Filter Continuous Form

[mafhobb]

I am trying to filter a bound, continuous form on load so it displays only the records with a specific field containing a string somewhere in the field value. This is what I have:

    If Me.OpenArgs <> "" Then
        strFilter = Me.OpenArgs
        Me.Filter = "[AutoEmailCode] like & 'strFilter'"
        Me.FilterOn = True
    End If

strFilter is a string.

I get a syntax error.

Any ideas?

Thanks

mafhobb

 

[Minty]

Your quotes are not quite right;

If Me.OpenArgs <> "" Then
        strFilter = Me.OpenArgs
        Me.Filter = "[AutoEmailCode] like [COLOR="Red"]'" [/COLOR]& strFilter [COLOR="red"]& "'"[/COLOR]
        Me.FilterOn = True
    End If

 

[arnelgp]

If Me.OpenArgs <> "" Then
strFilter = Me.OpenArgs
Me.Filter = "[AutoEmailCode] like " & strFilter
Me.FilterOn = True
End If

 

[mafhobb]

Thanks Minty, but no luck yet... When I modify the code as you show I get an empty continuous form. It looks like the "Like" parameter is not working.

 

[Minty]

You might need Like '*" & strFilter & "*'"if you need wildcard matches to work

 

[mafhobb]

This is what did it!

    If Me.OpenArgs <> "" Then
        strFilter = Me.OpenArgs
        Me.Filter = "[AutoEmailCode] like '*" & strFilter & "*'"
        Me.FilterOn = True
    End If

Thanks a bunch!

mafhobb