我如何阅读网络共享中的特殊类型的邮件

Question

从网络共享文件夹中选择的邮件项目有一个奇怪的图标，不同于常规类型（附图）。它可能与报告已收到邮件的 read/unread 状态有关。也许完全不同 class。

如何阅读 VBA 中的此类邮件？

Dim oSel As Outlook.Selection

Set oSel = Outlook.Application.ActiveExplorer.Selection

Dim oEmail As Outlook.mailitem

Set oEmail = oSel.Item(1)    ' getting a 13 compile error in this line

Answer 1

您有一个 ReportItem 对象，而不是 MailItem。将 oEmail 声明为通用对象，然后使用 TypeName() 函数确定实际对象类型或阅读 Class 属性（所有 Outlook 对象都公开它）- 对于 MailItem 对象它将是 43 (olMail).

我如何阅读网络共享中的特殊类型的邮件

How do i read a special type of mail in a network share

outlook

vba

mailitem