从 C# 启动电子邮件应用程序 (MAPI)（带附件）

Question

过去，我使用 MAPISendMail 从带有文件附件的 C++ 应用程序启动 Outlook（或任何所需的 MAPI 电子邮件应用程序）。 （类似于Microsoft Word 的发送电子邮件功能）。

我需要从 C# 应用程序执行相同的操作，并使其在 XP、Vista、Server 2008（我想还有 Windows 7）上运行时正常工作。

MAPISendMail 在 Vista/2008 下是不行的，因为当 Outlook 正在运行且托管代码不支持 MAPI 时，它总是返回 MAPI_ E_FAILURE。 即使在检查此修复之后： http://support.microsoft.com/kb/939718 我无法让它可靠地工作。

我知道 Microsoft Word 和 Adobe Reader 9 都可以在 Vista 下启动带有附件的 Outlook。

AC# 兼容解决方案将是首选，但我会对任何可行的解决方案感到满意（不必使用 MAPI）。 我似乎找不到当前的“解决方案”是什么。 Stack Overflow 上的现有答案似乎都没有涵盖这一点。

编辑：

我知道 MAPI 和 C# 不能一起工作，所以我将采取当不以管理员身份运行时，C/C++ 解决方案可在 Vista 和 Server 2008 中运行。 请参阅 Adob​​e Reader 9 和 Adob​​e Reader 9。 Microsoft Word 作为有效的示例。

Answer 1

在工作中我们已经使用 VSTO 成功地完成了这一任务。

以下是我们在 VISTA 和 Outlook 2007 上运行的一些行的片段：（代码位于 VB.net 中）。

请注意，当对 Outlook 对象执行某些操作时，使用会被安全锁定。 （地址、主体和其他标记为安全风险的属性）。 我们使用第三方组件（赎回）来解决此安全问题。 如果您不使用某种安全管理器，Outlook 会弹出一个小窗口，表明外部正在尝试访问它，您可以在一段时间内授予它访问权限。

Outlook界面的导入。

Imports Outlook = Microsoft.Office.Interop.Outlook

此示例旨在为您提供一些指导，而不是完整的工作示例。

dim MailItem As Microsoft.Office.Interop.Outlook.MailItem

' Lets initialize outlook object '
MailItem = OutlookSession.Application.CreateItem(Outlook.OlItemType.olMailItem)
MailItem.To = mailto

MailItem.Subject = communication.Subject
MailItem.BodyFormat = Outlook.OlBodyFormat.olFormatHTML
MailItem.HTMLBody = htmlBody

MailItem.Attachments.Add(filename, Outlook.OlAttachmentType.olByValue)

' If True is supplied to Display it will act as modal and is executed sequential. '
SafeMail.Display(True)

上面示例中的 OutlookSession 来自此属性：

    Public ReadOnly Property OutlookSession() As Outlook.NameSpace
        Get
            If Not OutlookApplication Is Nothing Then
                Return OutlookApplication.GetNamespace ("MAPI")
            Else
                Return Nothing
            End If
        End Get
    End Property

如您所见，它在内部使用 MAPI 来实现此目的。

祝你好运。

Answer 2

只要您只是在电子邮件中设置属性而不是阅读它们，您实际上并不需要像上面建议的那样兑换 VB。 这是一个简单的 VB 函数，用于通过 Outlook 显示/发送带有附件的电子邮件。 （此代码引用 Microsoft Outlook 12.0 对象库，例如“C:\Program Files\Microsoft Office\Office12\MSOUTL.OLB”）。

Sub DoMail()
    Set objOL = CreateObject("Outlook.Application")
    Set objNewMail = objOL.CreateItem(olMailItem)

    Dim filename As String
    filename = "C:\\temp\\example.txt"

    With objNewMail
        .To = "cjoy@spam_me_not.com"
        .Subject = "test"
        .Body = "Test Body"
        .Attachments.Add filename, Outlook.OlAttachmentType.olByValue
    End With

    objNewMail.Display

    'objNewMail.Send
End Sub

Answer 3

技术含量较低的方法，但使用 mailto 处理程序，您可以执行此操作

System.Diagnostics.Process.Start("mailto:[email protected]?subject=hello&attachment=c:\\chicken.xls");

注意：正如所指出的，这可能不适用于所有客户端，因为它不是 mailto URL 规范。 最重要的是（至少在我看来）Outlook 2007 不支持它，而旧版本则支持。

Answer 4

我不确定您是否需要在 Outlook 中打开电子邮件，或者您是否只想从 C# 发送带有附件的电子邮件。 我知道您在 Outlook 中打开，但您可能认为这是唯一的方法。 如果您只想发送带有附件的电子邮件，可以执行如下操作。

#using System.Net.Mail;

SmtpClient smtpClient = new SmtpClient(host, port);

MailMessage message = new MailMessage(from, to, subject, body);
Attachment attachment = new Attachment(@"H:\attachment.jpg");
message.Attachments.Add(attachment);

System.Net.NetworkCredential SMTPUserInfo = new System.Net.NetworkCredential(username, password);
smtpClient.UseDefaultCredentials = false;
smtpClient.Credentials = SMTPUserInfo;
smtpClient.Send(message);

您也可以在没有身份验证位的情况下执行此操作，具体取决于您的电子邮件服务器。

Answer 5

通过 Outlook 发送电子邮件的 C# 代码； 不会出现安全警告。

var outlook = new ApplicationClass();
MailItem mailItem = (MailItem)outlook.Session.Application.CreateItem(Outlook.OlItemType.olMailItem);

mailItem.Display(false);