New record vs. old record

[GD]

How do I get an auto date for new records on a form, but have previous
records refer back to the table for their date? I tried:

Private Sub cboEnteredBy_AfterUpdate()
If Me.NewRecord And Me.cboEnteredBy <> "" Then
Me.txtEntryDate = Now()
Else
Me.txtEntryDate = ""
End If

End Sub

in this event + the Form_Current, but it erased the dates of the previous
record's txtEntryDates. Can anyone help?

Thanks!!!

 

[Jeff Boyce]

Uhmmm?

Your "Else" statement tells Access to erase any value in the txtEntryDate
field if it isn't a new record?


--
Regards

Jeff Boyce
www.InformationFutures.net

Microsoft Office/Access MVP


Microsoft IT Academy Program Mentor
http://microsoftitacademy.com/

 

[GD]

Exactly. So how would I word it if I wanted old records to rely on the
table's field?

 

[Douglas J. Steele]

Private Sub cboEnteredBy_AfterUpdate()
If Me.NewRecord Then
If Me.cboEnteredBy <> "" Then
Me.txtEntryDate = Now()
Else
Me.txtEntryDate = Null
End If
End If
End Sub

 

[GD]

Works great! Thanks for the knowledge, Doug.