微軟 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 = '''
Hello, This is a test mail.
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 = '''
Hello, This is a test mail.
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?
python win32com outlook 2013 SendUsingAccount return exception
以上就是本文的全部內容，希望對大家的學習有所幫助，也希望大家多多支持腳本之家。
更多文章、技術交流、商務合作、聯系博主
微信掃碼或搜索：z360901061
微信掃一掃加我為好友
QQ號聯系： 360901061
您的支持是博主寫作最大的動力，如果您喜歡我的文章，感覺我的文章對您有幫助，請用微信掃描下面二維碼支持博主2元、5元、10元、20元等您想捐的金額吧，狠狠點擊下面給點支持吧，站長非常感激您！手機微信長按不能支付解決辦法：請將微信支付二維碼保存到相冊，切換到微信，然后點擊微信右上角掃一掃功能，選擇支付二維碼完成支付。
【本文對您有幫助就好】元
