在腳本中建立應用程式物件

授權原則存放區包含一或多個應用程式的授權原則資訊。 針對使用授權原則存放區的每個應用程式，您必須建立 IAzApplication 物件，並將它儲存至原則存放區。

下列範例示範如何建立代表應用程式的 IAzApplication 物件，以及如何將 IAzApplication 物件新增至應用程式所使用的授權原則存放區。 此範例假設磁片磁碟機 C 根目錄中有名為 MyStore.xml 的現有 XML 原則存放區。

'  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