vba - 什么时候 MailItem 不是 MailItem？

Question

关闭。这个问题需要debugging details .它目前不接受答案。












想改善这个问题吗？更新问题，使其成为 on-topic对于堆栈溢出。

3年前关闭。




Improve this question




我在 Outlook 的 Visual Basic(我们使用的是 Outlook 2003 和 Exchange Server)中编写了一个消息处理函数来帮助我整理传入的电子邮件。

它对我有用，除了有时规则失败并且 Outlook 停用它。

然后我重新打开规则并在我的收件箱上手动运行它以 catch 。该规则自发地失败并每天停用数次。

我很想一劳永逸地解决这个问题。

Answer 1

此代码向我展示了收件箱中的不同类型名称:

Public Sub GetTypeNamesInbox()
Dim myOlItems As Outlook.Items
Set myOlItems = application.GetNamespace("MAPI").GetDefaultFolder(olFolderInbox).Items
Dim msg As Object

For Each msg In myOlItems
    Debug.Print TypeName(msg)
    'emails are typename MailItem
    'Meeting responses are typename MeetingItem
    'Delivery receipts are typename ReportItem
Next msg

End Sub

HTH