在标记的截止日期自动将电子邮件移回收件箱

Question

我想知道如何让标记的电子邮件因为他们从某个文件夹移动到收件箱而如此。

本质上，我写了一些使Outlook像Google收件箱一样工作的VBA。该VBA：

• 让我“打盹”在收件箱中的电子邮件数天我挑（使用视图过滤器）
• 如果一个新的电子邮件进来相匹配的隐藏它的“延后“电子邮件，然后它用消息分类消息，所以当我打开电子邮件时，我会知道在同一个对话中有隐藏的电子邮件
  • 当一个”延后“电子邮件的计时器是它自动显示备份在收件箱中

现在我的代码使用视图过滤器“隐藏”的电子邮件：

"http://schemas.microsoft.com/mapi/proptag/0x10900003" = 1 OR 
"http://schemas.microsoft.com/mapi/proptag/0x10900003" = 0 OR 
"http://schemas.microsoft.com/mapi/id/{00062003-0000-0000-C000-000000000046}/81050040" <= 'Today' OR 
"urn:schemas:httpmail:messageflag" IS NULL 

不过，我想，而不是隐藏它，我应该将“延后”的电子邮件到另一个文件夹。

我坚持的部分是在定时器启动后将电子邮件移回收件箱。

我想我需要一些方法来钩入触发标记的电子邮件截止日期时触发的东西？

我想这样做的原因是因为，如果有人向我发送他们检举然后，因为我认为过滤器隐藏所有标记邮件的电子邮件会在为隐藏，我不会看到它的电子邮件直到它到期。

Answer 1

一个选项是捕获Application.Reminder事件，该事件提供触发事件的Item对象。然而，这要求标志也设置了一个提醒。唯一的其他选择是在定时器或Outlook开始时扫描邮箱 - 或ToDo列表 - 并计算每个标记项目的截止日期。