Tworzenie obiektu aplikacji w skrygcie

Magazyn zasad autoryzacji zawiera informacje o zasadach autoryzacji dla co najmniej jednej aplikacji. Dla każdej aplikacji korzystającej z magazynu zasad autoryzacji należy utworzyć obiekt IAzApplication i zapisać go w magazynie zasad.

W poniższym przykładzie pokazano, jak utworzyć obiekt IAzApplication reprezentujący aplikację oraz jak dodać obiekt IAzApplication do magazynu zasad autoryzacji używanych przez aplikację. W przykładzie przyjęto założenie, że istnieje istniejący magazyn zasad XML o nazwie MyStore.xml w katalogu głównym dysku 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