Partager via


Objet ServerPolicy (Office)

Représente une stratégie spécifiée pour un type de document stocké sur un serveur exécutant Microsoft Office SharePoint Server.

Remarques

L’objet ServerPolicy est composé d’objets PolicyItem individuels représentant les définitions de stratégie individuelles du document actif.

Exemple

L’exemple suivant répertorie le nom et la description de tous les éléments de stratégie du document actif.

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 

Voir aussi

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.