首页 文章

Mail-in 数据库及其附件未出现在“正文”字段中

提问于
浏览
0

我有一个 mail-in 数据库应用程序,但发现偶尔会收到一封电子邮件,该附件带有不属于“正文”字段的一部分,因此无法被 rtItem.EmbeddedObjects“看到”。

如果附件中没有附件,我如何识别该附件,一旦找到附件,该如何处理?

我需要确定附件的类型(PDF,JPG,DOC,XLS,etc.),分离附件,然后根据扩展名对其进行处理。

这是各种 If 语句,它们对 Body(RTF)字段和关联的 EmbeddedObjects 进行所有检查。这不会捕获到“身体”外部的附件。

Set rtItem = mailDoc.Getfirstitem("Body")
        If ( rtItem.Type = RICHTEXT ) Then
            If Not (IsEmpty(rtItem.EmbeddedObjects)) Then    
                ForAll o In rtItem.EmbeddedObjects
                    If (o.Type = EMBED_ATTACHMENT) Then
                        noAttachment = True                            
                    Else
                        noAttachment = True                            
                    End If                        
                End ForAll
            Else
                noAttachment = True                            
            End if
        Else
            noRTF = True
        End If

我还有一个文档,正文中没有任何内容,但$File 包含附件名称。你怎么找到的?

2 回答

  • 1

    您需要使用 NotesDocument 的 EmbeddedObjects 属性获取这些附件。该属性的并集加上所有富文本项的所有 EmbeddedObjects 属性,使您可以访问所有附件。请注意,通常您只需要担心“正文”富文本项。

  • 0

    仅供参考,当邮件服务器磁盘空间不足或病毒扫描程序阻止访问附件时,我们遇到了类似的问题

相关问题