Поделиться через


Объект ServerPolicy (Office)

Представляет политику, указанную для типа документа, хранящегося на сервере с Microsoft Office SharePoint Server.

Замечания

Объект ServerPolicy состоит из отдельных объектов PolicyItem , представляющих определения отдельных политик для активного документа.

Пример

В следующем примере перечислены имя и описание всех элементов политики для активного документа.

Sub ListPolicyItems() 
Dim objSrvPolicy As ServerPolicy 
Dim objPolicyItem As PolicyItem 
Dim strPolicyItemList As String 
 
Set objSrvPolicy = ActiveDocument.ServerPolicy 
 
For Each objPolicyItem In objSrvPolicy 
 strPolicyItemList = "Policy Item " & objPolicyItem.Name & " - " & _ 
 objPolicyItem.Description & vbCrLf 
Next 
MsgBox (strPolicyItemList) 
 
End Sub 

См. также

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

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