Mike,

I figured out the problem. I needed to add the following to save the changes made by your code:

loItem.Save

Also, you can modify the body of the email to include a refrence as follows:

cOldBody = loItem.body
cNewBody = cOldBody + Chr(13)+ 'new text here....'
loItem.Body = cNewBody
loItem.Save

Thanks again for all your help!

Russell