如何捕获电子邮件

How to capture an email

我在 Outlook 中创建了一个基本的自定义任务窗格。

我想将电子邮件拖放到任务窗格中。放下后，它应该允许我将电子邮件捕获为我猜的对象，允许我用它做一些事情，例如保存到共享点位置。

这可能吗？如果是这样，有什么指示吗？

我正在使用 VS2013 C# .NET 4.0，加载项适用于 Outlook 2010/2013。

您可以通过检查 Explorer class 的 Selection 属性 来获得掉落的物品或多个物品（如果允许的话）。在以下文章中阅读更多相关信息：

尝试这样的事情

        public static string[] GetDropedFiles(DragEventArgs e)
        {
            string[] files = null;
            var outlookFile = e.Data.GetData("FileGroupDescriptor", true) as MemoryStream;
            if (outlookFile != null)
            {
                OutlookEmailObject dataObject = new OutlookEmailObject(e.Data);

                var filenames = (string[])dataObject.GetData("FileGroupDescriptorW");
                var filestreams = (MemoryStream[])dataObject.GetData("FileContents");

                files = new string[filenames.Length];
                for (int fileIndex = 0; fileIndex < filenames.Length; fileIndex++)
                {
                    string filename = filenames[fileIndex];
                    MemoryStream filestream = filestreams[fileIndex];

                    string path = Path.GetTempPath();
                    string fullFileName = path + filename;

                    FileStream outputStream = File.Create(fullFileName);
                    filestream.WriteTo(outputStream);
                    outputStream.Close();

                    files[fileIndex] = fullFileName;
                }
            }
            else
                files = (string[])e.Data.GetData(DataFormats.FileDrop);

            return files;
        }

您可以在此处获取 OutlookEmailObject class（下载代码示例）：
http://www.codeproject.com/Articles/28209/Outlook-Drag-and-Drop-in-C

（当然你应该在完成后删除所有临时文件）

先决条件和设置

  • Windows 10 专业版
  • Visual Studio 2013 Ultimate with Office development
  • 带有电子邮件帐户的 Outlook 2013

项目

  • 在 Visual Studio select 新建项目 -> Visual C# -> Office/SharePoint -> Office 加载项 -> Outlook 2013 加载项
  • 右键单击项目 -> 添加 -> 用户控件

  • 打开"ThisAddIn.cs"并在"ThisAddIn_Startup"方法中添加以下代码：

    var myCustomPane= this.CustomTaskPanes.Add(new UserControl1(), "My Pane");
myCustomPane.Visible = true;

拖放消息

  • 在解决方案资源管理器中双击 UserControl1。这将打开设计器 window.

  • 在属性中设置 AllowDrop = True 并连接两个事件处理程序 DragDrop 和 DragEnter .

    private void UserControl1_DragEnter(object sender, DragEventArgs e)
{
    // if you want to read the message data as a string use this:
    if (e.Data.GetDataPresent(DataFormats.UnicodeText))
    {
        e.Effect = DragDropEffects.Copy;
    }
    // if you want to read the whole .msg file use this:
    if (e.Data.GetDataPresent("FileGroupDescriptorW") && 
        e.Data.GetDataPresent("FileContents"))
    {
        e.Effect = DragDropEffects.Copy;
    }
}

private void UserControl1_DragDrop(object sender, DragEventArgs e)
{
    // to read basic info about the mail use this:
    var text = e.Data.GetData(DataFormats.UnicodeText).ToString();
    var message = text.Split(new string[] { "\r\n" }, StringSplitOptions.None)[1];
    var parts = message.Split('\t');
    var from = parts[0]; // Email From
    var subject = parts[1]; // Email Subject
    var time = parts[2]; // Email Time

    // to get the .msg file contents use this:
    // credits to "George Vovos", 
    var outlookFile = e.Data.GetData("FileGroupDescriptor", true) as MemoryStream;
    if (outlookFile != null)
    {
        var dataObject = new iwantedue.Windows.Forms.OutlookDataObject(e.Data);

        var filenames = (string[])dataObject.GetData("FileGroupDescriptorW");
        var filestreams = (MemoryStream[])dataObject.GetData("FileContents");

        for (int fileIndex = 0; fileIndex < filenames.Length; fileIndex++)
        {
            string filename = filenames[fileIndex];
            MemoryStream filestream = filestreams[fileIndex];

            // do whatever you want with filestream, e.g. save to a file:
            string path = Path.GetTempPath() + filename;
            using (var outputStream = File.Create(path))
            {
                filestream.WriteTo(outputStream);
            }
        }
    }
}

你可以从 CodeProject or you can use this GitHub gist.

得到 "iwantedue.Windows.Forms.OutlookDataObject"

演示