스크립트에서 애플리케이션 그룹에 사용자 추가

권한 부여 관리자에서 애플리케이션 그룹은 사용자 및 사용자 그룹의 그룹입니다. 애플리케이션 그룹은 다른 애플리케이션 그룹을 포함할 수 있으므로 사용자 그룹을 중첩할 수 있습니다. 애플리케이션 그룹은 IAzApplicationGroup 개체로 표시됩니다.

애플리케이션 그룹의 구성원이 작업 또는 작업 집합을 수행할 수 있도록 허용하려면

• 해당 애플리케이션 그룹을 해당 작업이 포함된 역할에 할당합니다.

  역할은 IAzRole 개체로 표시됩니다.

다음 예제에서는 애플리케이션 그룹을 만들고, 사용자를 애플리케이션 그룹의 구성원으로 추가하고, 애플리케이션 그룹을 기존 역할에 할당하는 방법을 보여 있습니다. 이 예제에서는 C 드라이브의 루트 디렉터리에 MyStore.xml 라는 기존 XML 정책 저장소가 있고, 이 저장소에 Expense라는 애플리케이션이 포함되어 있으며, 이 애플리케이션에 Expense Administrator라는 역할이 포함되어 있다고 가정합니다.

'  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