Python 調用 Outlook 發(fā)送郵件過程解析

更新時間：2019年08月08日 10:25:19 作者：Stone0823

這篇文章主要介紹了Python 調用 Outlook 發(fā)送郵件過程解析,文中通過示例代碼介紹的非常詳細，對大家的學習或者工作具有一定的參考學習價值,需要的朋友可以參考下

微軟 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()

多賬號發(fā)送郵件

如果 Outlook 有多個賬號，需要選擇賬號發(fā)送郵件，需要在代碼中對賬號進行判斷，代碼如下：

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, 永遠從第一個郵箱賬號發(fā)送郵件，我使用的是 Office 365 版。需要調用 _oleobj_.Invoke() 方法。后面列出了參考鏈接。

本質上，這種方法是調用 COM 組件，可以查詢微軟的開發(fā)幫助了解相關對象的屬性和方法，比如我想知道 Account 的細節(jié)，就特意參考了下面這篇幫助：https://docs.microsoft.com/zh-cn/office/vba/api/outlook.account 。COM 編程與語言無關。另外可以在 Outlook 中 ALT + F11，進入 VBE 環(huán)境，然后 F2 進入對象瀏覽器界面查看比如下面的界面顯示了 Account 的屬性和方法:

關于調試

python 作為動態(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()

設置斷點的調試界面：

我們只知道 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

顯示出監(jiān)視窗口，設置斷點，獲取 accounts 信息：