2

是否可以通过检查项目的内容将不同的项目添加到邮件项目自定义上下文菜单?
例如,仅当主题行包含“重要”时才添加项目。

4

1 回答 1

2

This seems to work.

void Application_ItemContextMenuDisplay(Office.CommandBar CommandBar, Outlook.Selection Selection)
    {
        foreach (Outlook.MailItem m in Selection)
        {
            if (m.Subject.Contains("IMPORTANT"))
            {
                DeliveryFailureButton(CommandBar, Selection);
                break;
            }
        }
    }

    void DeliveryFailureButton(Office.CommandBar CommandBar, Outlook.Selection Selection)
    {
        Office.CommandBarButton btn = CommandBar.Controls.Add(
              Office.MsoControlType.msoControlButton,
              missing, missing, missing, true) as
              Office.CommandBarButton;
        btn.Caption = "Move to IMPORTANT messages";

        btn.Click += (Office.CommandBarButton Ctrl, ref bool CancelDefault) =>
        {
            string msg = "CRM Records\r\n";

            foreach (Outlook.MailItem item in Selection)
            {
                if (item is Outlook.MailItem)
                {
                    var mitem = item as Outlook.MailItem;
                    msg += "\r\n" + MoveToImportant(mitem);
                }
            }

            MessageBox.Show(msg);

        };
    }
于 2010-10-12T15:45:24.783 回答