Hello Dear.
i have form with search combo box i am using this code it's working properly for Autonumber field but it is giving error for Text Field where is the problem
message """Data Type Mismatch""
can any body help me
Private Sub Search_AfterUpdate()
On Error GoTo ErrorHandler
Dim strSearch As String
strSearch = "[id] = " & Me![search]
'Find the record that matches the control
Me.Requery
Me.RecordsetClone.FindFirst strSearch
Me.Bookmark = Me.RecordsetClone.Bookmark
ErrorHandlerExit:
Exit Sub
ErrorHandler:
MsgBox "Error No: " & Err.Number & "; Description: " & Err.Description
Resume ErrorHandlerExit
End Sub
i have form with search combo box i am using this code it's working properly for Autonumber field but it is giving error for Text Field where is the problem
message """Data Type Mismatch""
can any body help me
Private Sub Search_AfterUpdate()
On Error GoTo ErrorHandler
Dim strSearch As String
strSearch = "[id] = " & Me![search]
'Find the record that matches the control
Me.Requery
Me.RecordsetClone.FindFirst strSearch
Me.Bookmark = Me.RecordsetClone.Bookmark
ErrorHandlerExit:
Exit Sub
ErrorHandler:
MsgBox "Error No: " & Err.Number & "; Description: " & Err.Description
Resume ErrorHandlerExit
End Sub