IADsNTPolicy Method: GetAccountPrivileges

GetAccountPrivileges
(
  AccountName As String
) Variant;

Parameters

[in] String AccountName
Name of a User or Group for which privileges are obtained.

Description
It returns all privileges for a given account (User or Group).

Example

Dim Policy As IADsNTPolicy
Dim PrivilegeNames As Variant
Dim PrivilegeName As Variant
Set Policy = GetObject("NTDS://DomainName1/MachineName")
PrivilegeNames = Policy.GetAccountPrivileges ("DomainName\John")
For Each PrivilegeName in PrivilegeNames
 Debug.Print PrivilegeName
Next PrivilegeName
'Name of a User or Group for which privileges are obtained.
'Returns all privileges for a given account (User or Group).

 

See Also