5 pts.
 how to send a rich text field in a mime stream for email
I want to email the contents of a rich text field and send an URL link in the same document. When I send the rich text field through the mime code it does not maintain the spacing of the original text. I am using the mime code to send the URL link because I want to send the link with the format of <a href="www.nameOfDocument.com">Click Here</a> so that the long URL text does not show. The email should look like this: Rich text field comments should appear on the first line: Click Here(second line a link without showing the long URL) Thanks for any help. here is my code: mailDoc.Form = "Memo2" Set html = session.CreateStream mailDoc.Principal ="SendersNamel" mailDoc.Subject = "Take a look at this webpage I found.. " mailDoc.SendTo="myEmailAddress" Dim rtbody As NotesRichTextItem Set rtbody = New NotesRichTextItem(mailDoc, "Body") Dim rtitem As NotesRichTextItem ' ***************** Set rItem = doc.getfirstitem("personalMessage") Call rtbody.AppendRTItem (rItem) Call mailDoc.Save(True,True) Set mime = mailDoc.CreateMIMEEntity("Body") Call mime.SetContentFromText(html, "text/html; charset=iso-8859-1", ENC_QUOTED_PRINTABLE) html.WriteText("Click on the link below to view this page:") html.WriteText("<br>") html.WriteText(|<a href="| + doc.link(0)+|"> |+ title +|</a>|) Call mailDoc.Save(True,True) Call mailDoc.Send(False)

Software/Hardware used:
ASKED: October 8, 2008  4:51 PM
UPDATED: September 26, 2011  6:14 AM

Answer Wiki:
Hi, I'm trying to do something similar to that, did you manage to do it? i would appreciate if you can help me =)
Last Wiki Answer Submitted:  March 3, 2010  7:28 pm  by  Freak0n   45 pts.
All Answer Wiki Contributors:  Freak0n   45 pts.
To see all answers submitted to the Answer Wiki: View Answer History.


Discuss This Question:
_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _