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 支持和反馈,获取有关如何接收支持和提供反馈的指南。