A
Anthony Speiser
The following causes errors on my forms when the record contains an
apostrophe:
Private Sub Combo2_AfterUpdate()
' Find the record that matches the control.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[ownername] = '" & Me![Combo2] & "'"
Me.Bookmark = rs.Bookmark
End Sub
what changes do i need to make?
tia
apostrophe:
Private Sub Combo2_AfterUpdate()
' Find the record that matches the control.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[ownername] = '" & Me![Combo2] & "'"
Me.Bookmark = rs.Bookmark
End Sub
what changes do i need to make?
tia