vba - 我如何处理附件的附件？

Question

我正在自动处理某个收件箱中的电子邮件。但是，我们的供应商应向该收件箱发送电子邮件，并附上一份 pdf 附件。并且这个 pdf 附件应该保存到某个文件夹 - 到目前为止没问题。

但是：一个供应商发送的电子邮件仅包含另一封电子邮件作为附件，并且只有在该“子电子邮件”中才能找到 pdf。由于某些原因，他无法改变这一点。

现在似乎不可能将附件的该附件用作邮件项：

Set objMail_New = objMail_In.Attachments.Item(1)

我也不能再次将附件转发到相同的邮件地址（这会给我带来我首先需要的邮件）：

Set objMail_Forw = objMail_In.Attachments.Item(1).forward

两者都带来错误“类型不匹配”

还有其他想法吗？也许可以在本地保存（第一个）附件，然后处理它以获取第二个附件？

谢谢最大

score 0 · Accepted Answer

Outlook 不允许访问嵌入的邮件附件。最好的办法是将附件保存为 MSG 文件 (Attachment.SaveAsFile)，然后使用 Namespace.OpenSharedItem 打开它。

您还可以使用Redemption ，它允许使用 RDOAttachment .EmbeddedMsg访问嵌入的消息附件

1 回答 1