Private Sub quicksearch_AfterUpdate()
Dim db As DAO.Database
Dim rs As DAO.Recordset
Set rs = Me.Recordset.Clone
rs.FindFirst "[ID number] = " & Str(Me![quicksearch])
Me.Bookmark = rs.Bookmark
End Sub
this is the code that im using to help me with a listbox and a search text box that is embedded on my main form. it works ok. The problem is, i was trying to link an already filled out Table with data to this interface.
When i key in information from the form it works, but when i just enter stuff through the table (which was already completed and handed to me) When I click in the listbox on the main form the code window just pops up showing this section of my code. Help./
Help.
Dim db As DAO.Database
Dim rs As DAO.Recordset
Set rs = Me.Recordset.Clone
rs.FindFirst "[ID number] = " & Str(Me![quicksearch])
Me.Bookmark = rs.Bookmark
End Sub
this is the code that im using to help me with a listbox and a search text box that is embedded on my main form. it works ok. The problem is, i was trying to link an already filled out Table with data to this interface.
When i key in information from the form it works, but when i just enter stuff through the table (which was already completed and handed to me) When I click in the listbox on the main form the code window just pops up showing this section of my code. Help./
Help.