Reputation: 8481
Why does the following function always return 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
is an email.
Upvotes: 1
Views: 540
Reputation: 15739
Are you setting session.convertMIME = false
before running this? Otherwise the NotesSession will convert any MIME content to CD records.
Upvotes: 4