Как я могу получить доступ к подпапкам общего почтового ящика БЕЗ отключения режима «Загрузить общие папки» / режима кэширования? - PullRequest
Новая
       46

Как я могу получить доступ к подпапкам общего почтового ящика БЕЗ отключения режима «Загрузить общие папки» / режима кэширования?

0 голосов
/ 09 июля 2020

Этот вопрос похож на Почему я не могу получить доступ к подпапкам общего почтового ящика?

Используя VBA в excel, я получаю доступ к электронной почте, находящейся в подпапке общего почтового ящика в Outlook (ie SharedMailboxName> Inbox> SubfolderName> EmailName). При работе в кэшированном режиме и с активным параметром «загрузка общих папок» я не могу получить доступ к подпапкам.

Я могу запустить свою программу, используя решение, указанное в приведенной выше ссылке, но это решение требует отключения «загрузки общих папок». Ожидание загрузки электронных писем каждый раз, когда мне нужно получить доступ к одному вручную, слишком медленно, поэтому мне интересно, существует ли альтернативное решение.

Могу ли я добавить подпапку в кеш? Могу ли я получить доступ к Outlook, как если бы он находился в онлайн-режиме, а не в режиме кэширования, из excel VBA?

Вот простой пример кода: 

    Set oOlAp = CreateObject("Outlook.application")
    Set Ns = oOlAp.GetNamespace("MAPI")
    Set olShareName = Ns.CreateRecipient("address@companywebsite.com")
    Set Folder = Ns.GetSharedDefaultFolder(olShareName, 6)
    For Each f In Folder.Folders
        Debug.Print f.Name
    Next Name

Он ничего не печатает, если я не отключу "загрузка с общим доступом папки », и в этом случае он распечатает список вложенных папок.

...