撤消在Outlook中设置邮件信封图标？

Question

我们尝试使用以下几行代码来尝试控制Outlook中的邮件信封图标：

Dim PR_ICON_INDEX As String = "http://schemas.microsoft.com/mapi/proptag/0x10800003"
Dim olkPA As Outlook.PropertyAccessor
olkPA = mailitem.PropertyAccessor
olkPA.SetProperty(PR_ICON_INDEX, 0)

这会将一大堆消息（甚至是读取的消息）设置为封闭的信封图标

我们已经决定这不是要走的路。但是如何将图标重置为打开的信封阅读邮件图标？

我们已经尝试过了 olkPA.SetProperty(PR_ICON_INDEX, 1)
查看 1 是否为阅读邮件的图标，但它是一种固定的注释图标：

在我们点击我们想要的阅读信息图标之前尝试阳光下的所有数字是不切实际的......

你想知道是否在某处查找了所有这些图标？

如果你谷歌这个问题，你大多得到如何为你的消息设置自定义图标的说明。我们想撤消。

Answer 1

您只需要使用PropertyAccessor.DeleteProperty删除该属性。

您无需猜测 - 您可以使用OutlookSpy或MFCMAPI来比较好消息和坏消息。