Hallo zusammen,
gibt es eine Möglichkeit ein schön formatiertes Richtextitem als Internet mail zu versenden?
Code
Dim s As New NotesSession
Dim maildoc As NotesDocument
Dim body As NotesRichTextItem
Set maildoc = db.CreateDocument
maildoc.form = "formTest"
Call curDoc.CopyAllItems(maildoc)
Call maildoc.ComputeWithForm (True,False)
maildoc.SendTo = "Internet@Internet.de"
Set body=maildoc.CreateRichTextItem("Body")
Call curDoc.RenderToRTItem(body)
maildoc.Form = "Memo"
Call maildoc.Send( False)
Alles anzeigen
Wenn das im Internet Account ankommt ist es total zerfledert...
Gruß Stony