Time Stamp a Memo Field

mrssevans

Registered User.
Local time
Today, 04:09
Joined
Nov 15, 2001
Messages
190
I am wanting to timestamp and userstamp a memo field each time before the user start typing in the field. It would Look like
***User***Date***Time***
I have tried to do this in a macro but it is faulty.
Does anyone have any suggestions?
 
As for the User Stamp... I am not sure what your login process is...

As for Date/Time I have a Note Field on several Forms... In the table the field Data/Type is set to text. On the AfterUpdate Event of the notes Field I do the Following... I apply the Date/Time after the note is written.

**** MY CODE ****
Private Sub Notes_AfterUpdate()

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

End Sub
**** END MY CODE ****

You should be able to add the following code to your OnEnter Event. This will add the date before anything is typed... I am not sure if it will work on a Memo Data Type Field, But it does work on a text field...

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

........

I actually use two buttons, Add New Notes & View All Notes. The Add Button opens a form to Add Notes. The View All Button opens the Notes Table in Datasheet View. Both Buttons run a query. The query has [Me]![ContactID] in the ContactID Criteria Field. This allows the query to open only notes for the Current Contact.

[This message has been edited by donbettis (edited 11-15-2001).]
 
Don- since it is in a memo format will this still work?
 
It appears to work... It doesn't appear to be very clean though...
 

Users who are viewing this thread

Back
Top Bottom