M
magmike
I have a search box, that when the search term contains an apostrophe
(i.e. O'Charley's), I get an error. Here is the code:
Private Sub findcoButton_Click()
Me.Label7.Visible = False
Me.EnterLead.Visible = False
Forms!FindCompanies!findquery.Form.Filter = "Company Like " & "'*"
& Me.findco & "*'"
Forms!FindCompanies!findquery.Form.FilterOn = True
Forms!FindCompanies!findquery.Form.Visible = True
Me.Command15.Visible = True
Me.findco.SetFocus
End Sub
I sort of understand the problem, but don't know how to fix it. Help,
and thanks!
magmike
(i.e. O'Charley's), I get an error. Here is the code:
Private Sub findcoButton_Click()
Me.Label7.Visible = False
Me.EnterLead.Visible = False
Forms!FindCompanies!findquery.Form.Filter = "Company Like " & "'*"
& Me.findco & "*'"
Forms!FindCompanies!findquery.Form.FilterOn = True
Forms!FindCompanies!findquery.Form.Visible = True
Me.Command15.Visible = True
Me.findco.SetFocus
End Sub
I sort of understand the problem, but don't know how to fix it. Help,
and thanks!
magmike