Ich hätte es ja eher mit dem kostenlosen PDF-Creator versucht, der hat nämlich eine COM-Schnittstelle und kann so über LotusScript angesprochen werden:
https://docs.pdfforge.org/pdfcreator/en/pdfcreator/com-interface/
Bei dir benötigt man eine Datei im Filesystem, keine Ahnung ob hier ein "RTF-Export" ausreicht - sieht man erst am Ergebnis ;)
Declare Private Function MailGetMessageBodyComposite Lib "NNOTES" Alias "MailGetMessageBodyComposite" ( ByVal hNT As Long, ByVal N As String, ByVal D As String, nD As Long) As Integer
Declare Private Function ExportRTF Lib "nxrtf" Alias "ExportRTF" (ByVal sTempFile As String, ByVal flags As Long, hmod As Long, ByVal altlibrary As String, ByVal sRTFFile As String) As Integer
Public Sub ConvertDocToRtfFile(doc As NotesDocument, filePath As String)
Dim docT As New NotesDocument(doc.parentDatabase),rt As NotesRichTextItem, fileSize&
Set rt = docT.CreateRichTextItem("Body")
Call doc.RenderToRTItem(rt)
Call MailGetMessageBodyComposite(rt.Parent.handle , "Body", filePath & ".cd", fileSize)
Call ExportRTF(filePath & ".cd", 0, 0, "", filePath)
Kill filePath & ".cd"
End Sub