ServerPolicy object (Office)

Represents a policy specified for a document type stored on a server running Microsoft Office SharePoint Server.

Remarks

The ServerPolicy object is composed of individual PolicyItem objects representing the individual policy definitions for the active document.

Example

The following example lists the name and description of all the policy items for the active document.

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 

See also

• ServerPolicy object members
• Object Model Reference

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.