Forwarding HTML mails with Lotusscript

CarstenH
5 pts.
Tags:
LotusScript
MIME
[Base href="https://itknowledgeexchange.techtarget.com/itanswers/ask_question/">[/base] Hi, I'm trying to implement a "Report as Spam" button, based on this description: http://www-10.lotus.com/ldd/nd6forum.nsf/DateAllFlatweb/5fcffb9aac6241e185257132000ba1b5?OpenDocument That works fine as long as the mail contains plain text only. Forwarded HTML mails looks like on View/Show/PageSource (ASCII encoded Unicode characters and all that stuff). I assume that I have to assign the MIME type of the source mail to the forwarded mail, with something like memo.SetMIMEEntity = doc.GetMIMEEntity? However, I have no idea with the objects and syntax. Any suggestions or other ideas what could be the reason for that issue (and how to solve it)?
Asked: Last updated:
Related Questions

Answer Wiki

Thanks. We'll let you know when a new response is added.

Hi,

If you don´t want the message as HTML, I guess you could just copy the body item to the new document you are sending instead of copying the mime content as text. For that you´ll need something like:

dim itBody as NotesRichtextItem
set itBoddy = doc.GetFirstItem(“Body”)
call itBody.CopyItemToDocument(memo,”Body”)

in the place of:

Set mime = doc.GetMIMEEntity
If Not(mime Is Nothing) Then
Forall header In mime.HeaderObjects
Call mail.AppendText( walkmime ( mime ) ) ‘calls required function walkmime
End Forall
Call doc.CloseMIMEEntities ‘allow clean switch to using items

Like this the mail in the spn box should be just like the one the user recived.

Discuss This Question: 1  Reply

 
There was an error processing your information. Please try again later.
Thanks. We'll let you know when a new response is added.
Send me notifications when members answer or reply to this question.

Forgot Password

No problem! Submit your e-mail address below. We'll send you an e-mail containing your password.

Your password has been sent to:

To follow this tag...

There was an error processing your information. Please try again later.

Thanks! We'll email you when relevant content is added and updated.

Following

Share this item with your network: