Private Sub Notes_AfterUpdate()
Me.Notes = Me.Notes & " " & Now() & " "

End Sub

The above works just fine, except it doesn't put the last notes at the top of
the field, which is were I want it.

Thanks

Allan

Douglas J. Steele wrote:
What about

Me.Notes = Now() & " " & Me.Notes

Hi Tank

[quoted text clipped - 68 lines]

Allan

--
Message posted via AccessMonster.com
http://www.accessmonster.com/Uwe/For...forms/200611/1