Okay, I have the OnChange event working,but the following areas are not picking up field names.
memo.Subject=("This is a test document"+FieldName
Call rtitem.AppendText("This is the body"+FieldName2)
The quoted text is showing up in the email, but not the field value that I'd like to append to...