在脚本中创建应用程序对象

授权策略存储包含一个或多个应用程序的授权策略信息。 对于使用授权策略存储的每个应用程序,必须创建 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