我想在共享日历的联系人文件夹上使用GetCalendarExporter()。
我已经编写了代码,我认为它只会给出默认的日历文件夹(即所有者的日历文件夹)。我希望共享(委派)日历文件夹对象/指针。知道怎么做吗?
到目前为止,我的代码是:
CComPtr<Olk::_NameSpace> spNameSpace = spApplication->GetNamespace(L"MAPI");
Olk::MAPIFolderPtr spCalFolder = spNameSpace->GetDefaultFolder(Olk::olFolderCalendar);
spCalFolder->GetCalendarExporter();发布于 2021-06-10 10:31:39
您需要使用NameSpace.GetSharedDefaultFolder方法,它返回一个Folder对象,该对象表示指定用户的指定默认文件夹。此方法用于委托方案,其中一个用户为其一个或多个默认文件夹(例如,共享日历文件夹)向另一个用户委派了访问权限。
Sub ResolveName()
Dim myNamespace As Outlook.NameSpace
Dim myRecipient As Outlook.Recipient
Dim CalendarFolder As Outlook.Folder
Set myNamespace = Application.GetNamespace("MAPI")
Set myRecipient = myNamespace.CreateRecipient("Eugene Astafiev")
myRecipient.Resolve
If myRecipient.Resolved Then
Call ShowCalendar(myNamespace, myRecipient)
End If
End Sub
Sub ShowCalendar(myNamespace, myRecipient)
Dim CalendarFolder As Outlook.Folder
Set CalendarFolder = myNamespace.GetSharedDefaultFolder(myRecipient, olFolderCalendar)
CalendarFolder.Display
End Subhttps://stackoverflow.com/questions/67918400
复制相似问题