Création d’un objet d’application dans un script

Un magasin de stratégies d’autorisation contient des informations de stratégie d’autorisation pour une ou plusieurs applications. Pour chaque application qui utilise un magasin de stratégies d’autorisation, vous devez créer un objet IAzApplication et l’enregistrer dans un magasin de stratégies.

L’exemple suivant montre comment créer un objet IAzApplication qui représente une application et comment ajouter l’objet IAzApplication au magasin de stratégies d’autorisation utilisé par l’application. L’exemple suppose qu’il existe un magasin de stratégies XML nommé MyStore.xml dans le répertoire racine du lecteur C.

'  Create the AzAuthorizationStore object.
Dim AzManStore
Set AzManStore = CreateObject("AzRoles.AzAuthorizationStore")

'  Initialize the authorization store.
AzManStore.Initialize 2, "msxml://C:\MyStore.xml"

'  Create an application object in the store.
Dim expenseApp
Set expenseApp= AzManStore.CreateApplication("Expense")

'  Save changes to the store.
expenseApp.Submit