Свойство BusinessCardView.SaveOption (Outlook)

Возвращает константу OlViewSaveOption , указывающую папки, в которых доступно указанное представление, и разрешения на чтение, присоединенные к представлению. Только для чтения.

Синтаксис

выражение. SaveOption

Выражение Выражение, возвращающее объект BusinessCardView .

Замечания

Значение свойства SaveOption устанавливается при создании объекта BusinessCardView с помощью метода Add коллекции Views .

Пример

В следующем примере Visual Basic для приложений (VBA) пользовательский интерфейс блокируется для всех представлений, доступных всем пользователям. Подпрограмма LockView принимает объект View и логическое значение, указывающее, будет ли заблокирован пользовательский интерфейс View . В этом примере процедура всегда вызывается с логическим значениемTrue.

Sub LockPublicViews() 
 
 
 
 Dim objName As NameSpace 
 
 Dim objViews As Views 
 
 Dim objView As View 
 
 
 
 ' Get the Views collection for the Contacts default folder. 
 
 Set objName = Application.GetNamespace("MAPI") 
 
 Set objViews = objName.GetDefaultFolder(olFolderContacts).Views 
 
 
 
 ' Enumerate the Views collection and lock the user 
 
 ' interface for any view that can be accessed by 
 
 ' all users who have access to the Notes default folder. 
 
 For Each objView In objViews 
 
 If objView.SaveOption = olViewSaveOptionThisFolderEveryone Then 
 
 Call LockView(objView, True) 
 
 End If 
 
 Next objView 
 
 
 
End Sub 
 
 
 
Sub LockView(ByRef objView As View, ByVal blnAns As Boolean) 
 
 
 
 ' Examine the view object. 
 
 With objView 
 
 If blnAns = True Then 
 
 ' Lock the user interface and 
 
 ' save the view 
 
 .LockUserChanges = True 
 
 .Save 
 
 Else 
 
 ' Unlock the user interface of the view. 
 
 .LockUserChanges = False 
 
 End If 
 
 End With 
 
 
 
End Sub

См. также

Объект BusinessCardView

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.