使用 vb.net 创建带有附件的 Outlook 消息

Question

我想创建一个带有主题和一些附件的 Outlook 消息，供用户在准备好后发送。我有附件的文件路径。我该怎么做呢？

基本上，用户需要单击应用程序上的一个按钮，然后打开一个带有预定义消息和一些附件的 Outlook 消息窗口。然后，他们应该能够在通过 Outlook 发送之前修改和添加所需的“收件人”等。

谢谢！

Answer 1

如何使用 Visual Basic .NET 在电子邮件中发送附件

http://support.microsoft.com/kb/313803

这里是 C# 版本的代码：

void Main()
{
    // Create an Outlook application.
    Outlook._Application oApp;
    oApp = new Outlook.Application();

    // Create a new MailItem.
    Outlook._MailItem oMsg;
    oMsg = oApp.CreateItem(Outlook.OlItemType.olMailItem);
    oMsg.Subject = "Send Attachment Using OOM in Visual Basic .NET";
    oMsg.Body = "Hello World" + vbCr + vbCr;

    // TODO: Replace with a valid e-mail address.
    oMsg.To = "user@example.com";

    // Add an attachment
    // TODO: Replace with a valid attachment path.
    string sSource = "C:\\Temp\\Hello.txt";
    // TODO: Replace with attachment name
    string sDisplayName = "Hello.txt";

    string sBodyLen = oMsg.Body.Length;
    Outlook.Attachments oAttachs = oMsg.Attachments;
    Outlook.Attachment oAttach;
    oAttach = oAttachs.Add(sSource, , sBodyLen + 1, sDisplayName);

    // Send
    oMsg.Send();

    // Clean up
    oApp = null;
    oMsg = null;
    oAttach = null;
    oAttachs = null;
}