Свойство Folder.IsSharePointFolder (Outlook)
Возвращает логическое значение, определяющее, является ли папка папкой Microsoft SharePoint Foundation. Только для чтения.
Синтаксис
выражение. IsSharePointFolder
Выражение Переменная, представляющая объект Folder .
Замечания
Папка SharePoint Foundation — это настраиваемая папка в Outlook, содержащая динамическую копию списка контактов или списка событий на веб-сайте SharePoint Foundation. Список контактов сопоставляется с папкой "Контакты" в Outlook, а список событий — с папкой "Календарь".
Папки SharePoint Foundation автоматически создаются в узле Папки SharePoint в области навигации при экспорте списка контактов или списка событий с веб-сайта SharePoint Foundation.
Хотя папки SharePoint Foundation работают так же, как и другие папки, существует несколько исключений. Папки SharePoint Foundation доступны только для чтения, и любая попытка изменить свойства папки, добавить, изменить или удалить существующие элементы завершится ошибкой.
Папка в папке сервера Microsoft Exchange никогда не будет папкой SharePoint Foundation, а папка в файле личных папок пользователя по умолчанию (PST) никогда не будет папкой SharePoint Foundation. Как правило, папки SharePoint Foundation будут находиться в узле Папки SharePoint в области навигации.
Пример
В следующем примере Microsoft Visual Basic для приложений (VBA) изменяется строка Тема элемента встречи, отображаемого в активном инспекторе, и он сохраняется. Если элемент содержится в папке SharePoint Foundation, пользователю отображается сообщение о том, что элемент нельзя изменить. Чтобы запустить этот пример, убедитесь, что элемент встречи отображается в окне активного инспектора. В этом примере изменяется тема элемента встречи.
Sub ChangeItem()
'Checks if the item is contained in a SharePoint folder. If it is not, it changes the Subject line, and then saves the item.
Dim myItem As Outlook.AppointmentItem
Dim fldFolder As Outlook.Folder
Set myItem = Application.ActiveInspector.CurrentItem
Set fldFolder = myItem.Parent
If fldFolder.IsSharePointFolder = True Then
MsgBox _
"The item is contained in a SharePoint Foundation folder and cannot be modified."
Else
myItem.Subject = myItem.Subject + " Changed by VBA"
myItem.Save
MsgBox "The item has been changed."
End If
End Sub
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.