Add group : Group Account « Access « VBA / Excel / Access / Word






  1. VBA / Excel / Access / Word
  2. Access
  3. Group Account

Add group

 

Sub GroupAdd()

    Dim mySpace As Workspace
    Dim grpRegistrars As Group
    Dim strGroupPID As String

    Set mySpace = DBEngine(0)
    strGroupPID = "5678"
    Set grpRegistrars = mySpace.CreateGroup("Registrars")
    grpRegistrars.PID = strGroupPID
    mySpace.Groups.Append grpRegistrars
End Sub








Related examples in the same category

1.Creating a Group Account
2.To create a new group account in the current database
3.Adding a User to a New Group
4.Deleting a Group Account
5.Listing All Group Accounts
6.Listing Users in Groups
7.Creating a Group Account with SQL command
8.Making a User Account a Member of a Group with SQL command
9.Removing a User Account from a Group with SQL command
10.Deleting a User Account with SQL command
11.Granting Permissions for Tables to an Existing Group with SQL command
12.Revoking Security Permissions with SQL command
13.Deleting a Group Account with SQL command
14.Add user to group