D
Dymondjack
I've got two subforms that populate a main form. One is a list of contacts
(datasheet view), and another is the detail for a contact (single form view).
I have figured out (with the advice of strive4peace) how to make my current
record for the detail sfr to change to reflect the currently selected record
in the list form. This way the user can double click the name in the list
and get the detailed information on the contact.
What I'm trying to accomplish now is to get the detail sfr to go to a new
record if the new record row on the list is selected. I've tried just about
every way of telling this form to do this that I can think of, and I have
gotten absolutely nowhere with it. Here's the code that I have that works
with the two sfr's when there is a valid record selected:
If Me.NewRecord Then
GoTo Exit_Procedure
End If
With Me.Parent.ctlsfrCompContactDetail.Form
.RecordsetClone.findfirst "ContactID = " & Me.ContactID
If Not .RecordsetClone.nomatch Then
.Bookmark = .RecordsetClone.Bookmark
End If
End With
I would think that this would have been as easy as telling the current
record for the subform to go to a new record under the If Me.NewRecord
statement, but apparently I'm missing something. Thanks for the help.
(datasheet view), and another is the detail for a contact (single form view).
I have figured out (with the advice of strive4peace) how to make my current
record for the detail sfr to change to reflect the currently selected record
in the list form. This way the user can double click the name in the list
and get the detailed information on the contact.
What I'm trying to accomplish now is to get the detail sfr to go to a new
record if the new record row on the list is selected. I've tried just about
every way of telling this form to do this that I can think of, and I have
gotten absolutely nowhere with it. Here's the code that I have that works
with the two sfr's when there is a valid record selected:
If Me.NewRecord Then
GoTo Exit_Procedure
End If
With Me.Parent.ctlsfrCompContactDetail.Form
.RecordsetClone.findfirst "ContactID = " & Me.ContactID
If Not .RecordsetClone.nomatch Then
.Bookmark = .RecordsetClone.Bookmark
End If
End With
I would think that this would have been as easy as telling the current
record for the subform to go to a new record under the If Me.NewRecord
statement, but apparently I'm missing something. Thanks for the help.