微軟 Office 提供基于 COM 接口的編程。Python 通過 pywin32 可以方便地調(diào)用各組件。如果下載和安裝 pywin32 有困難，可以到 Sourceforge 的鏡像網(wǎng)摘查找合適的版本。
單一賬號(hào)
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()
多賬號(hào)發(fā)送郵件
如果 Outlook 有多個(gè)賬號(hào)，需要選擇賬號(hào)發(fā)送郵件，需要在代碼中對賬號(hào)進(jìn)行判斷，代碼如下：
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()
這里有點(diǎn)黑魔法，直接設(shè)置 mail_item.SendUsingAccount 不會(huì)起作用，返回值是 None, 永遠(yuǎn)從第一個(gè)郵箱賬號(hào)發(fā)送郵件，我使用的是 Office 365 版。需要調(diào)用 _oleobj_.Invoke() 方法。后面列出了參考鏈接。
本質(zhì)上，這種方法是調(diào)用 COM 組件，可以查詢微軟的開發(fā)幫助了解相關(guān)對象的屬性和方法，比如我想知道 Account 的細(xì)節(jié)，就特意參考了下面這篇幫助：https://docs.microsoft.com/zh-cn/office/vba/api/outlook.account 。COM 編程與語言無關(guān)。另外可以在 Outlook 中 ALT + F11，進(jìn)入 VBE 環(huán)境，然后 F2 進(jìn)入對象瀏覽器界面查看比如下面的界面顯示了 Account 的屬性和方法:
關(guān)于調(diào)試
python 作為動(dòng)態(tài)語言，通過 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()
設(shè)置斷點(diǎn)的調(diào)試界面：
我們只知道 account 是一個(gè) COM Object，account 包含的信息很多都是 unknown 的。碰到這種情況，我一般用 C# 或者 VBA 編寫代碼進(jìn)行調(diào)試。如果我需要詳細(xì)了解 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
顯示出監(jiān)視窗口，設(shè)置斷點(diǎn)，獲取 accounts 信息：
在監(jiān)視窗口添加變量 accounts:
展開：
Item 1 和 Item 2 表示有兩個(gè)賬號(hào)，現(xiàn)在我們想看到 Item 2 的賬號(hào)信息，將 Item 2 展開：
DeliveryStore 屬性也包含 account 的信息，可以展開查看。
參考
SendUsingAccount Does Not Work in Outlook 2010, possible bug?
python win32com outlook 2013 SendUsingAccount return exception
以上就是本文的全部內(nèi)容，希望對大家的學(xué)習(xí)有所幫助，也希望大家多多支持腳本之家。
更多文章、技術(shù)交流、商務(wù)合作、聯(lián)系博主
微信掃碼或搜索：z360901061
微信掃一掃加我為好友
QQ號(hào)聯(lián)系： 360901061
您的支持是博主寫作最大的動(dòng)力，如果您喜歡我的文章，感覺我的文章對您有幫助，請用微信掃描下面二維碼支持博主2元、5元、10元、20元等您想捐的金額吧，狠狠點(diǎn)擊下面給點(diǎn)支持吧，站長非常感激您！手機(jī)微信長按不能支付解決辦法：請將微信支付二維碼保存到相冊，切換到微信，然后點(diǎn)擊微信右上角掃一掃功能，選擇支付二維碼完成支付。
【本文對您有幫助就好】元
