.NET 8 WPF应用从Outlook拖拽邮件保存时抛出异常求解

问题场景 #

基于.NET 8的WPF应用中，实现从Microsoft Outlook拖拽邮件并保存到磁盘的功能时，执行var fileContentsStream = (Stream)e.Data.GetData("FileContents")语句抛出以下COM相关异常：

System Error saving email:    at System.Runtime.InteropServices.ComTypes.IDataObject.GetData(FORMATETC& format, STGMEDIUM& medium)
at System.Windows.DataObject.OleConverter.GetDataFromOleIStream(String format, DVASPECT aspect, Int32 index)
at System.Windows.DataObject.OleConverter.GetDataFromBoundOleDataObject(String format, DVASPECT aspect, Int32 index)
at System.Windows.DataObject.OleConverter.GetData(String format, Boolean autoConvert, DVASPECT aspect, Int32 index)
at System.Windows.DataObject.OleConverter.GetData(String format, Boolean autoConvert)
at Test.MainWindow.SaveOutlookEmail(DragEventArgs e) in C:\Projects\Tests\Test\MainWindow.xaml.cs:line 62

相关代码如下：

private void OnDrop(object sender, DragEventArgs e)
{
    if (e.Data.GetDataPresent("FileGroupDescriptorW"))
    {
        SaveOutlookEmail(e);
    }
    ...
}

private void SaveOutlookEmail(DragEventArgs e)
{
    try
    {
        // Extract the file name (metadata)
        using (var fileGroupDescriptorStream = (MemoryStream)e.Data.GetData("FileGroupDescriptor"))
        {
            string fileName = GetFileNameFromDescriptor(fileGroupDescriptorStream);
            Debug.WriteLine($"Extracted file name: {fileName}");

            // Check if the FileContents format is available
            if (e.Data.GetDataPresent("FileContents"))
            {
                // Extract the file content
                using (var fileContentsStream = (Stream)e.Data.GetData("FileContents"))
                {
                    var outputPath = Path.Combine(Environment.GetFolderPath(Environment.SpecialFolder.Desktop), fileName);

                    // Save the email content to a .msg file
                    using (var outputFileStream = new FileStream(outputPath, FileMode.Create, FileAccess.Write))
                    {
                        fileContentsStream.CopyTo(outputFileStream);
                    }

                    Debug.WriteLine($"Email content saved to: {outputPath}");
                }
            }
        }
    }
    catch (System.Exception ex)
    {
        Debug.WriteLine($"System Error saving email: {ex.StackTrace}");
    }
}

排查与解决方法 #

• 统一数据格式标识
  代码中判断时使用FileGroupDescriptorW（宽字符版本的文件组描述符），但获取流时用的是FileGroupDescriptor，二者不匹配会导致文件名解析异常，进而影响后续内容读取。需将获取描述符的代码改为：

  using (var fileGroupDescriptorStream = (MemoryStream)e.Data.GetData("FileGroupDescriptorW"))
  

  同时确保GetFileNameFromDescriptor方法能正确解析宽字符版本的描述符。

• 指定索引获取FileContents
  Outlook拖拽的邮件数据可能需要指定索引来正确获取内容（默认单文件索引为0），修改FileContents的获取逻辑：

  if (e.Data.GetDataPresent("FileContents"))
  {
      // 指定索引0获取单个邮件内容
      using (var fileContentsStream = (Stream)e.Data.GetData("FileContents", true, 0))
      {
          var outputPath = Path.Combine(Environment.GetFolderPath(Environment.SpecialFolder.Desktop), fileName);
          using (var outputFileStream = new FileStream(outputPath, FileMode.Create, FileAccess.Write))
          {
              fileContentsStream.CopyTo(outputFileStream);
          }
          Debug.WriteLine($"Email content saved to: {outputPath}");
      }
  }
  

• 改用Outlook Interop直接处理
  绕开OLE数据流的问题，直接通过Outlook的COM对象获取并保存邮件：

  1. 安装NuGet包Microsoft.Office.Interop.Outlook
  2. 修改保存逻辑：

  private void SaveOutlookEmail(DragEventArgs e)
  {
      try
      {
          if (e.Data.GetDataPresent(typeof(Outlook.MailItem)))
          {
              var mailItem = (Outlook.MailItem)e.Data.GetData(typeof(Outlook.MailItem));
              // 替换文件名中的非法字符
              var safeSubject = string.Join("_", mailItem.Subject.Split(Path.GetInvalidFileNameChars()));
              var outputPath = Path.Combine(Environment.GetFolderPath(Environment.SpecialFolder.Desktop), $"{safeSubject}.msg");
              mailItem.SaveAs(outputPath, Outlook.OlSaveAsType.olMSG);
              Debug.WriteLine($"Email saved to: {outputPath}");
          }
      }
      catch (Exception ex)
      {
          Debug.WriteLine($"Error saving email: {ex.StackTrace}");
      }
  }
  

  此方法依赖客户端安装Outlook，但稳定性更高。

• 处理线程模型冲突
  WPF UI线程与Outlook COM线程模型可能存在冲突，可将保存逻辑放入Dispatcher调用中：

  Dispatcher.Invoke(() =>
  {
      // 邮件保存逻辑
  });
  

内容的提问来源于stack exchange，提问作者chrx