共用方式為


Outlook) (MailItem.SendUsingAccount 屬性

會傳回或設定 Account 物件,代表要傳送 MailItem 的帳戶。 讀取/寫入。

語法

expression。 SendUsingAccount

表達 會傳回 MailItem 物件的運算式。

註解

呼叫 Send 方法時,SendUsingAccount 屬性可用來指定應該用於傳送 MailItem 的帳戶。 如果為 MailItem 指定的帳戶已不存在,這個屬性會傳回 Null (在 Visual Basic 中則是 Nothing)。

範例

Microsoft Visual Basic for Applications 中的下列程式碼範例會列舉 Accounts 集合 ,以尋找 Pop3 帳戶。 如果找到帳戶,就會以程式設計方式建立訊息,並將 SendUsingAccount 屬性指派給 Pop3 帳戶。 請注意,呼叫 Send 方法之前,必須先指定 SendUsingAccount 屬性。

Sub SendUsingAccount() 
 
 Dim oAccount As Outlook.account 
 
 For Each oAccount In Application.Session.Accounts 
 
 If oAccount.AccountType = olPop3 Then 
 
 Dim oMail As Outlook.MailItem 
 
 Set oMail = Application.CreateItem(olMailItem) 
 
     oMail.Subject = "Sent using POP3 Account" 
 
     oMail.Recipients.Add ("someone@example.com") 
 
     oMail.Recipients.ResolveAll 
 
 Set oMail.SendUsingAccount = oAccount 
 
     oMail.Send 
 
 End If 
 
 Next 
 
End Sub

另請參閱

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應