Поделиться через

Добавление пользователей в группу приложений в скрипте

  • Статья

В диспетчере авторизации группа приложений — это группа пользователей и групп пользователей. Группа приложений может содержать другие группы приложений, поэтому группы пользователей могут быть вложенными. Группа приложений представлена объектом IAzApplicationGroup .

Разрешение членам группы приложений выполнять задачу или набор задач

  • Назначьте эту группу приложений роли, содержащей эти задачи.

    Роли представлены объектами IAzRole .

В следующем примере показано, как создать группу приложений, добавить пользователя в качестве члена группы приложений и назначить ей существующую роль. В примере предполагается, что в корневом каталоге диска C существует хранилище политик XML с именем MyStore.xml, что это хранилище содержит приложение с именем Expense и что это приложение содержит роль Администратор расходов.

'  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.OpenApplication("Expense")

'  Create an application group object.
Dim appGroup
Set appGroup = expenseApp.CreateApplicationGroup("Approvers")

'  Add a member to the group.
'  Replace with valid domain and user name.
appGroup.AddMemberName("domain\\username")

'  Save information to the store.
appGroup.Submit

'  Open a role object.
Dim adminRole
Set adminRole = expenseApp.OpenRole("Expense Administrator")

'  Add the group to the role.
adminRole.AddAppMember("Approvers")

'  Save the information to the store.
adminRole.Submit