在处理 C# Outlook 之前按接收时间对电子邮件进行排序

Question

在处理电子邮件并将数据输入数据库时​​，我需要先按接收时间对电子邮件进行排序。

我需要它，以便将收到的最新电子邮件放入数据库中以覆盖旧版本（如果有旧版本）。

Microsoft.Office.Interop.Outlook.Items 项目 = (Outlook.Items)source.Items;

源是包含我想要排序的电子邮件的文件夹

我已经尝试了以下四种方法：

            items.Sort("ReceivedTime", false);
            items.Sort("[ReceivedTime]", Outlook.OlSortOrder.olAscending);
            items.Sort("ReceivedTime", Outlook.OlSortOrder.olSortNone);
            items.Sort("[ReceivedTime]");

这似乎没有对它进行排序，因为它仍然将最旧的邮件放入第二个数据库中，覆盖最新的提交。

有什么想法吗？

Answer 1

如果你希望它们降序，它应该是

items.Sort("[ReceivedTime]", false);

或 true

Answer 2

我花了很多时间试图解决同样的问题。

Microsoft Interop.outlook 中似乎存在某种错误，如果您直接尝试从文件夹中排序，它根本不起作用。

 Microsoft.Office.Interop.Outlook.Application 应用程序 = new Microsoft.Office.Interop.Outlook.Application(); 
  Microsoft.Office.Interop.Outlook._NameSpace ns = app.GetNamespace("MAPI");
        Microsoft.Office.Interop.Outlook.MAPIFolder inboxFolder = null;
  inboxFolder = ns.GetDefaultFolder(Microsoft.Office.Interop.Outlook.OlDefaultFolders.olFolderInbox);

        inboxFolder.Items.Sort("[ReceivedTime]", false);
        foreach (var item in inboxFolder.Items)
        {
            // ITEMS ARE NOT SORTED
        }

为了使其工作，您必须将它们复制到不同的列表中，然后进行排序。下面的例子将会起作用。
 Outlook.Application app = new Outlook.Application();

 Outlook.NameSpace outlookNs = app.GetNamespace("MAPI");

 Outlook.MAPIFolder emailFolder =        outlookNs.GetDefaultFolder(Microsoft.Office.Interop.Outlook.OlDefaultFolders.olFolderInbox);

 Outlook.Items myItems = emailFolder.Items;
 myItems.Sort("[ReceivedTime]", false);
  foreach (var item in myItems)

  {

       var itemObj = item as MailItem;

       if (itemObj != null)

       {

                   // This time it will work

       }

  }

Answer 3

现在我不知道你的项目对象是什么类，但也许“排序”方法没有返回类型“void”，但它本身返回一个新列表。

因此，您应该像这样分配您的列表：

items = items.Sort();

然后您可以尝试四种方法中的哪一种适合您的需求。
我希望这有帮助！

Answer 4

Sub SortByDueDate() 
 Dim myNameSpace As Outlook.NameSpace 
 Dim myFolder As Outlook.Folder 
 Dim myItem As Outlook.TaskItem 
 Dim myItems As Outlook.Items 

 Set myNameSpace = Application.GetNamespace("MAPI") 
 Set myFolder = myNameSpace.GetDefaultFolder(olFolderTasks) 
 Set myItems = myFolder.Items 
 myItems.Sort "[DueDate]", False 
 For Each myItem In myItems 
 MsgBox myItem.Subject &; "-- " &; myItem.DueDate 
 Next myItem 
End Sub

这段代码来自MSDN。我很困惑为什么一开始它就设置了myItmes=myFolder.Items。经过多次尝试，我知道这是一个陷阱。如果直接使用myFolder.Items.sort...，排序功能不起作用。