Add new text to existing text in same field?

[WinDancer]

I have a memo field on a form.
I want to write certain events to that field, either on that form or into the underlying table.
I want new event text added to that, preserving the data that may or may not be there.

example:
Issue opened on 5/5/2009
Isue assigned on 5/9/2009
Issue worked on 5/10/2009
Issue resolved on 5/13/2009

The events will be triggered from another form.

Best way to do this?

Thanks,
Dave

 

[WinDancer]

Here is the code I am trying to run:

Forms!frmHistory![textarea].Value = [textarea] & vbNewLine & "Task Assigned on " & Now() & " by " & Environ("UserName")

 

[boblarson]

Best way to do this?

The BEST way? Or the way to make it work like you want? The BEST way is to have another table and capture each entry as a RECORD instead of appending to an existing record.

To do it like you want is to use:

Forms!frmHistory![textarea].Value = Forms!frmHistory![textarea] & vbNewLine & "Task Assigned on " & Date & " by " & Environ("UserName")

 

[WinDancer]

The best way- so I will work on the table and just add a new entry. I added the code that I tried so you folks would know that I had tried to make it work on my own.

I have been working on this database for a little over two months. My questions are getting closer together becaus I am down to just the items I am having problems with.

I hope to finish my work on it by late next week.

I always appreciate the help this forum provides.

Thanks, Bob!

 

[Mike375]

I do similar with file notes. However, as Bob says I have each file note as a record in another table and each note is added to a single memo field and with date and time from file note record, which I do for display, printing and so the notes in the one field can be inserted into a Word Bookmark.

You need the Many table records for selecting notes based on date, time, category of note etc. and I would imagine you would need the same.

After seeing how Bob arranges to get the Many entries into a single field....then my method is a huge work around and I would be embarrassed to show how I do it

 

[Mike375]

[text7] being field with time/date so time/date matches exactly in Many record and combined entries

If IsNull(Forms!formexp![xyz]) Then
Forms!formexp![xyz].Value = Forms!formexp![xyz] & Forms!formexp![Text7] & " " & Forms!formexp![aaa]
Else
Forms!formexp![xyz].Value = Forms!formexp![xyz] & vbNewLine & vbNewLine & Forms!formexp![Text7] & " " & Forms!formexp![aaa]
End If

 

[mafhobb]

What if you wanted to have a double line in between the original and the new entries?

I have tried

...& "<br>" &...

between them and it did not work.

mafhobb

 

[mafhobb]

Got it... Just add & vbnewline &

mafhobb

 

[boblarson]

Got it... Just add & vbnewline &

mafhobb

& vbCrLf &

would also work.