I have an agent that simply takes a notes document and sends it to an internet address by doing a RenderToRTItem. The Notes document consists of a table with up to 20 rows.
Sometimes (once so far that I know of) when the document was received by the user with the internet email account the last 7 rows of the table were filled with [IMAGE] and the data that was supposed to be in the rows was missing. I can’t recreate it now, but I really need to know why it happened so I can prevent it from happening again. Any ideas? Here’s my code - it works 99% of the time. Thanks!
Sub Initialize
’ This script creates a picture of the current document and
’ places it into the Body of the newly created document B.
Set session = New NotesSession
Set workspace = New NotesUIWorkspace
Set db = session.CurrentDatabase
Set uidoc = workspace.CurrentDocument
Set currDoc = uidoc.Document
Set mailDoc = New NotesDocument( db )
Set rtitem = New NotesRichTextItem( mailDoc, "Body" )
mailDoc.Form = "Memo"
Call mailDoc.save(True,False)
formNm = uidoc.FieldGetText("Form")
Select Case formNm
Case "frmRecallStr", "frmRecallMstr"
mailDoc.Subject = "Product Recall"
Case "frmWRAStr", "frmWRAMstr"
mailDoc.Subject = "WRA"
End Select
success = currDoc.RenderToRTItem( rtitem )
'Call mailDoc.Send(False,"Product Recall")
Call mailDoc.Send(False,"janeDoe@hotmail.com")