Question

我试图编写一个脚本，该脚本对Outlook中特定公共交换文件夹中的电子邮件进行计数。如果子文件夹2中有邮件，则应打开一个消息框，告诉我有多少邮件。我试过了，但是没用。

    Outlook := ComObjActive("Outlook.Application")
    mail = (Outlook.Application.ActiveExplorer().Session.GetDefaultFolder(18).Folders("Subfolder\Subfolder2")
    if (mail.Items.Count>0)
    {
    msgbox % mail.Items.Count "Mails in folder"
    }
    else
    {
    msgbox No Mails.
    }

有人有想法，我应该如何更改脚本，使其起作用？

Answer 1

请尝试使用此功能：

mail：= Outlook.ActiveExplorer（）。Session.GetDefaultFolder（18）.Folders（“ Subfolder \ Subfolder2”）

Answer 2

您必须一次检索子文件夹，不能指定路径。更改行

 mail = (Outlook.Application.ActiveExplorer().Session.GetDefaultFolder(18).Folders("Subfolder\Subfolder2")

到

 mail = (Outlook.Application.ActiveExplorer().Session.GetDefaultFolder(18).Folders("Subfolder").Folders("Subfolder2")

Answer 3

我明白了。我只是删除了变量。

 Outlook := ComObjActive("Outlook.Application")
    if (Outlook.Application.ActiveExplorer().Session.GetDefaultFolder(18).Folders("Subfolder").Folders("Subfolder2").Items.Count>0)
    {
    msgbox % Outlook.Application.ActiveExplorer().Session.GetDefaultFolder(18).Folders("Subfolder").Folders("Subfolder2").Items.Count "Mails in folder"
    }
    else
    {
    msgbox No Mails.
    }

感谢您的帮助：D

使用Autohotkey在Outlook中计数邮件

3 个答案: