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 支援與意見反應。