CODEWITHSUNDEEP
ms-accessvba
Joe Patrick
Joe Patrick

Reputation: 51

ms access findfirst goes to new record instead of displaying specified record

This code was working fine then suddenly starting displaying 'new' instead of the specified record. I can't think of anything I did that would make this suddenly stop working as expected. Any help would be greatly appreciated.

Private Sub cboHotel_AfterUpdate()

Dim rs As Object
Dim strCriteria As String

Set rs = Me.Recordset.Clone

strCriteria = "[EventName] = '" & Me.cboEvent & "' And [Hotel] = '" & Me.cboHotel & "'"

rs.FindFirst strCriteria

If Not rs.EOF Then Me.Bookmark = rs.Bookmark

Forms!Submissions!TabCtl1.Visible = True

Forms!Submissions!EventName.SetFocus

End Sub

Upvotes: 0

Views: 66

Answers (1)

Joe Patrick
Joe Patrick

Reputation: 51

form>properties>data>data entry needs to be set to No

Upvotes: 1

Related Questions