在制作一个邮件归类工具,利用循环找到符合条件的邮件,然后移动到outlook的子目录下
但发现每次都只能移动到一半邮件,完全不知道什么问题
import win32com.client
outlook = win32com.client.Dispatch("Outlook.Application").GetNamespace("MAPI")
for Account in outlook.Folders:
if 'xxxxx@163.com' in Account.Name:
for 邮箱目录 in Account.Folders:
if '收件箱' in 邮箱目录.Name:
收件箱=邮箱目录.Item
elif '其他目录' in 邮箱目录.Name: #其他目录为需将邮件移动到那里的邮箱子目录
其他目录=邮箱目录.Item
for message in 收件箱:
if 'XXX' in message.Subject: #XXX为关键字
message.Move(其他目录)