微软 Office 提供基于 COM 接口的编程。Python 通过 pywin32 可以方便地调用各组件。如果下载和安装 pywin32 有困难,可以到 Sourceforge 的镜像网摘查找合适的版本。
单一账号
import win32com.client as win32 def send_mail(): outlook = win32.Dispatch('Outlook.Application') mail_item = outlook.CreateItem(0) # 0: olMailItem mail_item.Recipients.Add('someone@qq.com') mail_item.Subject = 'Mail Test' mail_item.BodyFormat = 2 # 2: Html format mail_item.HTMLBody = ''' <H2>Hello, This is a test mail.</H2> Hello Guys. ''' mail_item.Send() if __name__ == '__main__': send_mail()
多账号发送邮件
如果 Outlook 有多个账号,需要选择账号发送邮件,需要在代码中对账号进行判断,代码如下:
def send_mail(): outlook_app = win32.Dispatch('Outlook.Application') # choose sender account send_account = None for account in outlook_app.Session.Accounts: if account.DisplayName == 'sender@hotmail.com': send_account = account break mail_item = outlook_app.CreateItem(0) # 0: olMailItem # mail_item.SendUsingAccount = send_account not working # the following statement performs the function instead mail_item._oleobj_.Invoke(*(64209, 0, 8, 0, send_account)) mail_item.Recipients.Add('receipient@qq.com') mail_item.Subject = 'Test sending using particular account' mail_item.BodyFormat = 2 # 2: Html format mail_item.HTMLBody = ''' <H2>Hello, This is a test mail.</H2> Hello Guys. ''' mail_item.Send() if __name__ == '__main__': send_mail()
这里有点黑魔法,直接设置 mail_item.SendUsingAccount 不会起作用,返回值是 None, 永远从第一个邮箱账号发送邮件,我使用的是 Office 365 版。需要调用 _oleobj_.Invoke() 方法。后面列出了参考链接。
本质上,这种方法是调用 COM 组件,可以查询微软的开发帮助了解相关对象的属性和方法,比如我想知道 Account 的细节,就特意参考了下面这篇帮助:https://docs.microsoft.com/zh-cn/office/vba/api/outlook.account 。COM 编程与语言无关。另外可以在 Outlook 中 ALT + F11,进入 VBE 环境,然后 F2 进入对象浏览器界面查看比如下面的界面显示了 Account 的属性和方法:
关于调试
python 作为动态语言,通过 Debug 获取 COM 对象信息并不是很方便,比如下面代码:
import win32com.client as win32 def print_outlook_accounts(): outlook_app = win32.Dispatch('Outlook.Application') for account in outlook_app.Session.Accounts: print (account.DeliveryStore.DisplayName) if __name__ == '__main__': send_mail()
设置断点的调试界面:
我们只知道 account 是一个 COM Object,account 包含的信息很多都是 unknown 的。碰到这种情况,我一般用 C# 或者 VBA 编写代码进行调试。如果我需要详细了解 account 的属性和方法,在 Office 的任何组件中,比如 Excel,写一段下面的代码:
Public Sub Print_Outlook_Accounts() ' 工具 -> 引用:添加 Microsoft Outook Object Library 引用 Dim outlookApp As New Outlook.Application Dim accounts As Outlook.accounts Set accounts = outlookApp.Session.accounts Dim account As Outlook.account For Each account In accounts Debug.Print account.DisplayName Next End Sub
显示出监视窗口,设置断点,获取 accounts 信息:
在监视窗口添加变量 accounts:
展开:
Item 1 和 Item 2 表示有两个账号,现在我们想看到 Item 2 的账号信息,将 Item 2 展开:
DeliveryStore 属性也包含 account 的信息,可以展开查看。
参考
SendUsingAccount Does Not Work in Outlook 2010, possible bug"_blank" href="https://stackoverflow.com/questions/35908212/python-win32com-outlook-2013-sendusingaccount-return-exception" rel="external nofollow" >python win32com outlook 2013 SendUsingAccount return exception
以上就是本文的全部内容,希望对大家的学习有所帮助,也希望大家多多支持。
RTX 5090要首发 性能要翻倍!三星展示GDDR7显存
三星在GTC上展示了专为下一代游戏GPU设计的GDDR7内存。
首次推出的GDDR7内存模块密度为16GB,每个模块容量为2GB。其速度预设为32 Gbps(PAM3),但也可以降至28 Gbps,以提高产量和初始阶段的整体性能和成本效益。
据三星表示,GDDR7内存的能效将提高20%,同时工作电压仅为1.1V,低于标准的1.2V。通过采用更新的封装材料和优化的电路设计,使得在高速运行时的发热量降低,GDDR7的热阻比GDDR6降低了70%。
更新日志
- 中国武警男声合唱团《辉煌之声1天路》[DTS-WAV分轨]
- 紫薇《旧曲新韵》[320K/MP3][175.29MB]
- 紫薇《旧曲新韵》[FLAC/分轨][550.18MB]
- 周深《反深代词》[先听版][320K/MP3][72.71MB]
- 李佳薇.2024-会发光的【黑籁音乐】【FLAC分轨】
- 后弦.2012-很有爱【天浩盛世】【WAV+CUE】
- 林俊吉.2012-将你惜命命【美华】【WAV+CUE】
- 晓雅《分享》DTS-WAV
- 黑鸭子2008-飞歌[首版][WAV+CUE]
- 黄乙玲1989-水泼落地难收回[日本天龙版][WAV+CUE]
- 周深《反深代词》[先听版][FLAC/分轨][310.97MB]
- 姜育恒1984《什么时候·串起又散落》台湾复刻版[WAV+CUE][1G]
- 那英《如今》引进版[WAV+CUE][1G]
- 蔡幸娟.1991-真的让我爱你吗【飞碟】【WAV+CUE】
- 群星.2024-好团圆电视剧原声带【TME】【FLAC分轨】