Outlook打开工享Calendar

最新推荐文章于 2025-07-12 13:57:46 发布

原创最新推荐文章于 2025-07-12 13:57:46 发布 · 1.3k 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#calendar #object #application #button #class

Office Development 同时被 3 个专栏收录

134 篇文章

订阅专栏

63 篇文章

订阅专栏

Visual Studio 2010

40 篇文章

订阅专栏

本文介绍如何通过Outlook的Application绕过直接访问限制，间接获取Calendar信息的方法，包括代码实现和潜在错误处理。

其实……通过Outlook的Application我们是不能直接访问人家的Calendar的。所以我们要绕个圈子去访问它。

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using Microsoft.Office.Tools.Ribbon;
using Outlook = Microsoft.Office.Interop.Outlook;
using System.Windows.Forms;

namespace OutlookAddIn26
{
    public partial class Ribbon1
    {
        private void Ribbon1_Load(object sender, RibbonUIEventArgs e)
        {

        }

        private void button1_Click(object sender, RibbonControlEventArgs e)
        {
            Outlook.Application objApplication = Globals.ThisAddIn.Application;
            Outlook.Explorer objExplorer = objApplication.ActiveExplorer();
            Outlook.NavigationPane objNavigationPane = objExplorer.NavigationPane;
            if (objNavigationPane.CurrentModule.NavigationModuleType == Outlook.OlNavigationModuleType.olModuleCalendar)
            {
                Outlook.CalendarModule objCalendarModule = objNavigationPane.Modules.GetNavigationModule(Outlook.OlNavigationModuleType.olModuleCalendar) as Outlook.CalendarModule;
                foreach (Outlook.NavigationGroup objNavigationGroup in objCalendarModule.NavigationGroups)
                {
                    foreach (Outlook.NavigationFolder objNavigationFolder in objNavigationGroup.NavigationFolders)
                    {
                        if (objNavigationFolder.DisplayName.IndexOf("Bruce Song") >= 0)
                        {
                            Outlook.MAPIFolder objTargetCalendar = objNavigationFolder.Folder;
                            foreach (Outlook.AppointmentItem objAppointimetItem in objTargetCalendar.Items)
                            {
                                if (objAppointimetItem.BusyStatus == Outlook.OlBusyStatus.olFree)
                                {
                                    objAppointimetItem.Display();
                                }
                            }
                        }
                    }
                }
            }
        }
    }
}

如果你没有访问权限，这个代码会出错。