Enumerate group and users : User Account « Access « VBA / Excel / Access / Word

VBA / Excel / Access / Word

1.	Access
2.	Application
3.	Data Type
4.	Data Type Functions
5.	Date Functions
6.	Excel
7.	File Path
8.	Forms
9.	Language Basics
10.	Math Functions
11.	Outlook
12.	PowerPoint
13.	String Functions
14.	Windows API
15.	Word
16.	XML

Java

Java Tutorial

Java Source Code / Java Documentation

Illustrator Tutorials

GIMP Tutorials

C# / C Sharp

C# / CSharp Tutorial

C# / CSharp Open Source

SQL Server / T-SQL Tutorial

Oracle PL / SQL

Oracle PL/SQL Tutorial

Flash / Flex / ActionScript

XML

XML Tutorial

Microsoft Office PowerPoint 2007 Tutorial

Microsoft Office Excel 2007 Tutorial

Microsoft Office Word 2007 Tutorial

VBA / Excel / Access / Word » Access » User Account

Enumerate group and users


 



Sub EnumGroupsAndUsers()



    Dim grp As Group

    Dim usr As User

    For Each usr In DBEngine(0).Users

        Debug.Print usr.Name

        For Each grp In usr.Groups

            Debug.Print vbTab; grp.Name

        Next

    Next



End Sub

Related examples in the same category

1.	Add a new user
2.	Creating a User Account
3.	Deleting a User Account
4.	Listing All User Accounts
5.	Retrieving the Name of the Object Owner
6.	Setting User Permissions for an Object
7.	Creating a User Account with SQL command
8.	Changing a User Password with SQL command
9.	Setting User Permissions for a Database
10.	Setting User Permissions for Containers
11.	Checking Permissions for a Specific Object

www.java2java.com | Contact Us

All other trademarks are property of their respective owners.