Open.ics с Outlook 2013, чтобы читать элементы

Question

Это специфично для офиса 2013.

В предыдущих версиях Office (2010), у меня был скрипт, который будет загружать вложения .ics, а затем сохранить его в мой календарь , После загрузки .ics я затем перебираю файл .ics и копирую все AppointmentItem в свой календарь.

Dim oSharedFolder As Outlook.folder 
Set oSharedFolder = _ 
    Application.GetNamespace("MAPI").OpenSharedFolder(_ 
    "C:\Temp\1421940003_event.ics") 

Однако в 2013 VBA метод OpenSharedFolder не позволяет мне сделать это больше, говоря: «Операция не удалась.» В процессе изучения документации MSDN я вижу:

OpenSharedFolder - This method does not support iCalendar appointment (.ics) files. To open iCalendar appointment files, you can use the OpenSharedItem method of the NameSpace object

Хорошо, здорово! Вместо этого они заменили имя на OpenSharedItem (игнорируйте их пример, используя файл .ics .., который имеет ту же ошибку). Однако, когда я иду туда, я вижу:

OpenSharedItem - This method does not support iCalendar calendar (.ics) files. To open iCalendar calendar files, you can use the OpenSharedFolder method of the NameSpace object

Так как они связаны друг с другом - неправильно, я мог бы добавить, так как не в состоянии, несмотря на то, оба примера говорят они работа для файлов ics.

Мой вопрос:

• Как я могу открыть файл .ics с Outlook 2013 VBA?

Answer 1

я могу думать только либо разбор файла ICS явно в коде или с помощью Redemption: это позволит вам импортировать, поскольку ICS события файлов с помощью RDOAppointmentItem. Import (..., olICal), но он также не позволит вам обрабатывать несколько событий в одном файле ICS ...