如何将NotesDocument转换为MIME

Question

为什么下面的函数总是返回Nothing？

Function GetMimeEntity(Doc As NotesDocument) As NotesMimeEntity
    Set GetMimeEntity = Doc.GetMIMEEntity

    If GetMimeEntity Is Nothing Then
        Doc.ConvertToMIME 2
        Set GetMimeEntity = Doc.GetMIMEEntity
    End If
End Function

Doc是电子邮件。

Answer 1

您是否正在运行此设置session.convertMIME = false？否则，NotesSession会将所有MIME内容转换为CD记录。