使用 Autohotkey 在 Outlook 中统计邮件
Counting Mails in Outlook with Autohotkey
我尝试编写一个脚本,计算 outlook 中特定 public 交换文件夹中的电子邮件。
如果子文件夹 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.
}
有没有人知道我应该如何更改脚本,它是否有效?
请尝试使用这个:
邮件 := Outlook.ActiveExplorer().Session.GetDefaultFolder(18).文件夹("Subfolder\Subfolder2")
您必须一次检索一个子文件夹,不能指定路径。更改行
mail = (Outlook.Application.ActiveExplorer().Session.GetDefaultFolder(18).Folders("Subfolder\Subfolder2")
到
mail = (Outlook.Application.ActiveExplorer().Session.GetDefaultFolder(18).Folders("Subfolder").Folders("Subfolder2")
我明白了。
我只是删除了变量。
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
我尝试编写一个脚本,计算 outlook 中特定 public 交换文件夹中的电子邮件。 如果子文件夹 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.
}
有没有人知道我应该如何更改脚本,它是否有效?
请尝试使用这个:
邮件 := Outlook.ActiveExplorer().Session.GetDefaultFolder(18).文件夹("Subfolder\Subfolder2")
您必须一次检索一个子文件夹,不能指定路径。更改行
mail = (Outlook.Application.ActiveExplorer().Session.GetDefaultFolder(18).Folders("Subfolder\Subfolder2")
到
mail = (Outlook.Application.ActiveExplorer().Session.GetDefaultFolder(18).Folders("Subfolder").Folders("Subfolder2")
我明白了。 我只是删除了变量。
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