Outlook打开工享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();
                                }
                            }
                        }
                    }
                }
            }
        }
    }
}

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

相关资源:http://download.csdn.net/detail/tx_officedev/3962208

posted @ 2011-12-23 15:24  许阳 无锡  阅读(247)  评论(0编辑  收藏  举报