Hi All,
Attached is a screenshot of an error message that seems to occur sometimes but then at other times it works fine.
It happens on searching for a student and trying to click on a result to transfer the text to a form.
The code I am using is as follows:
I would appreciate any advice on how to solve the problem.
Thanks
Attached is a screenshot of an error message that seems to occur sometimes but then at other times it works fine.
It happens on searching for a student and trying to click on a result to transfer the text to a form.
The code I am using is as follows:
Code:
Private Sub QuickSearch_AfterUpdate()
DoCmd.Requery
Me.RecordsetClone.FindFirst "[StudentID] = " & QuickSearch.Column(2)
If Not Me.RecordsetClone.NoMatch Then
Me.Bookmark = Me.RecordsetClone.Bookmark
Else
MsgBox "Could not locate [" & Me![QuickSearch] & "]"
End If
Forms!frm_tutor!Tutorial.Form!StudentID = Me.QuickSearch.Column(2)
DoCmd.close acForm, "frmStudentSearch1", acSaveNo
End Sub
I would appreciate any advice on how to solve the problem.
Thanks