Groups Property, read only, User class

Description

Get a list of groups that an NT user belongs to .

Syntax

Set vGroups = User.Groups

Returns

Groups - Contains methods and properties for enumerating groups.

Remarks

Groups Property uses NetUserGetGroups API function to enumerate groups.

Examples

List of groups that 'Administrator' belongs to

Dim S, Group
Set S = CreateObject("UserManager.Server")
For Each Group In S.Users("administrator").Groups
    Debug.Print "<br>" & Group.Name & "," & Group.Comment
Next

Methods of User class

AddToGroup, AddToLocalGroup, Delete, RemoveFromGroup, RemoveFromLocalGroup, UserAdd

Properties of User class

AuthFlags, BadPasswordCount, CodePage, Comment, CountryCode, Disabled, Expires, Flags, FullName, Groups, HomeDir, HomeDirDrive, ID, LastLogOff, LastLogon, LocalGroups, LockOut, LogonHours, MaxStorage, Name, NumOfLogons, Password, PasswordAge, PasswordCannotChange, PasswordExpired, PasswordNeverExpires, PasswordNotRequired, PrimaryGroupID, Privilege, Profile, Ras, ScriptPath, Server, UserComment, Workstations

UserManager.User

Properties of the user account, and methods for creating, deleting and selecting users.

Easy to use classes to create, delete and manage local and remote user accounts, groups, servers and domains in the Windows NT (2000/XP) environment. Simple work with user accounts and groups from VBA, VBS/JS, ASP and T-SQL.