G
Guest
I have tried to get combo box to update it's list after adding a record to no
avail. It works fine when I close and save the database which sense as the
following query is run when the form loads:
Row Source: SELECT Login.[Primary Key], Login.StudentID FROM Login;
The combo box is unbound as I am not trying to change the data in the record
set. The following is the code that is automatically created when you use the
wizard.
Private Sub Combo63_AfterUpdate()
' Find the record that matches the control.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[Primary Key] = " & Str(Nz(Me![Combo63], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub
This al works fine except when I add a new record it does not appear in the
list.
I have tried Combo63.Requery...this only stops the list from having anything
in it at all. I have tried just about everything I can think of but to redo
everything in VB which I don't want to do. Is therte a simple solution to
this problem
Thanks very much,
Glen L. Harvey
avail. It works fine when I close and save the database which sense as the
following query is run when the form loads:
Row Source: SELECT Login.[Primary Key], Login.StudentID FROM Login;
The combo box is unbound as I am not trying to change the data in the record
set. The following is the code that is automatically created when you use the
wizard.
Private Sub Combo63_AfterUpdate()
' Find the record that matches the control.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[Primary Key] = " & Str(Nz(Me![Combo63], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub
This al works fine except when I add a new record it does not appear in the
list.
I have tried Combo63.Requery...this only stops the list from having anything
in it at all. I have tried just about everything I can think of but to redo
everything in VB which I don't want to do. Is therte a simple solution to
this problem
Thanks very much,
Glen L. Harvey