Adding date stamp to form comments memo field

[mikehorse]

Hi
I have a form with the purpose of tracking an incident. On the form is a memo-field call "comments", the idea being that each time the incident is updated the user can add a few comments to explain the update..



What I would like to do is have a button called "add comment" which will add the date (and eventually the username), the user can then add some text, this is then repeated on each subsequent update. Effectively adding a timestamp to each comments entry.

I have the button and the vba code to add the date;

me.comments.setfocus
me.comments.text = Now()

however when the button is pressed the existing entries in the comments field are replaced with the new date. How can I get this function to not replace the existing entries, but append the date on a new line underneath the existing entries ?

thanks

[pbaldy]

You don't need the set focus line, just don't use the .Text property:

me.comments = me.comments & Now()

likely you'll want to add spaces or whatever, but you get the point.

[mikehorse]

Hi Paul,
Thanks for your help.

[pbaldy]

No problem, post back if you get stuck.