outlook-vba 3.2 Ссылка на папку по умолчанию

пример#

В TestDefaultFldr() я установил Fldr в папку «Входящие» по умолчанию. Постоянный olFolderInbox можно заменить другими значениями, предоставляющими доступ к любой из папок по умолчанию. Если вы Set Fldr = Session.GetDefaultFolder( , в редакторе VB появится выпадающий список всех возможных значений.

Sub TestDefaultFldr()

  Dim Fldr As Folder

  Set Fldr = Session.GetDefaultFolder(olFolderInbox)

  Debug.Print Join(GetFldrNames(Fldr), "|")

End Sub

На моем ноутбуке TestDefaultFldr() отображает Outlook data file|Inbox который стал неожиданностью. Я написал GetFldrNames(Fldr) чтобы убедиться, что папка, на которую я ссылался, была той, которую я хотел. Я получил доступ к папке «Входящие» по умолчанию и обнаружил, что он пуст! Магазин «Выходной файл данных» поставляется с установкой по умолчанию, и я проигнорировал его, так как Outlook создал хранилище для каждой из моих учетных записей электронной почты. Только после того, как я обнаружил свой пустой почтовый ящик по умолчанию, я подумал о том, как Outlook будет знать, какая из моих учетных записей электронной почты была учетной записью, которую я хотел бы использовать по умолчанию. Из стандартных папок Outlook по умолчанию нет или по умолчанию находится «Выходной файл данных». Возможно, будет возможно изменить, какой из входящих сообщений является папкой «Входящие» по умолчанию, но я не исследовал, потому что я не уверен, какие из моих учетных записей электронной почты я бы сделал по умолчанию, если бы я это изменил. Просто помните, что все ваши элементы календаря, задачи и т. Д. Находятся в «файле данных Outlook» и убедитесь, что вы включили «Outlook.pst» в свой список архивов.

Большинство объектов Outlook имеют свойство Parent . GetFldrNames(Fldr) записывает имя папки в массиве, прежде чем пытаться получить доступ к ее родительскому GetFldrNames(Fldr) . Он циклически добавляет имена в конец массива, пока не достигнет магазина. В хранилище нет родителя, поэтому попытка доступа к нему не выполняется. Последовательность имен в массиве меняется на обратный и затем возвращается вызывающему. Я использовал Join чтобы превратить массив имен в отображаемую строку.