Creating a Group Account with SQL command : Group Account « Access « VBA / Excel / Access / Word






Creating a Group Account with SQL command

 
Sub CreateGroupAccount()
    Dim conn As ADODB.Connection

    On Error GoTo ErrorHandler

    Set conn = CurrentProject.Connection

    conn.Execute "CREATE GROUP YourGroupN asdf"
ExitHere:
    If Not conn Is Nothing Then
        If conn.State = adStateOpen Then conn.Close
    End If
    Set conn = Nothing
    Exit Sub
ErrorHandler:
    Debug.Print Err.Number & ":" & Err.Description
    Resume ExitHere
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.Making a User Account a Member of a Group with SQL command
8.Removing a User Account from a Group with SQL command
9.Deleting a User Account with SQL command
10.Granting Permissions for Tables to an Existing Group with SQL command
11.Revoking Security Permissions with SQL command
12.Deleting a Group Account with SQL command
13.Add group
14.Add user to group