Office) (ServerPolicy 物件

代表專為儲存在執行 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 

另請參閱

• ServerPolicy 物件成員
• 物件模型參考資料

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。