-1

By default, in Microsoft Office Outlook 2013 I can define a delegate from the GAL (Global Address List). Is there a way to choose an entity from my contacts like can be done when sending an email?

thanks.

4

2 回答 2

0

您似乎对 Outlook 项目的SendUsingAccount属性感兴趣。它允许设置一个 Account 对象,该对象表示要在其下发送 MailItem 的帐户。例如:

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  
   oMail.SendUsingAccount = oAccount  
   oMail.Send  
 End If  
Next  
End Sub 
于 2015-02-18T12:44:15.187 回答
0

您是通过 Exchange 或 SMTP 帐户发送吗?在前一种情况下,如果您有足够的权限,Exchange 只会让您作为主要用户或代理用户发送。

如果您需要作为代理 Exchange 地址之一发送,则无法使用 Outlook UI、对象模型或 MAPI 执行此操作。您可以尝试为此使用ProxyManager(它使用 SMTP 通过您的 Exchange 服务器发送)。

于 2015-02-18T17:40:31.720 回答