RoleProvider.AddUsersToRoles Method
Assembly: System.Web (in system.web.dll)
'Declaration Public MustOverride Sub AddUsersToRoles ( _ usernames As String(), _ roleNames As String() _ ) 'Usage Dim instance As RoleProvider Dim usernames As String() Dim roleNames As String() instance.AddUsersToRoles(usernames, roleNames)
public abstract void AddUsersToRoles ( String[] usernames, String[] roleNames )
public abstract function AddUsersToRoles ( usernames : String[], roleNames : String[] )
Not applicable.
Parameters
- usernames
A string array of user names to be added to the specified roles.
- roleNames
A string array of the role names to add the specified user names to.
AddUsersToRoles is called by the Roles class to associate the specified users with the specified roles at the data source. Roles are added to the configured ApplicationName.
If any of the roleNames specified are not found for the configured applicationName, we recommend that your provider throw a ProviderException.
If any of the usernames specified are not associated with any of the roleNames specified for the configured applicationName, we recommend that your provider throw a ProviderException.
If any of the specified usernames is a null reference (Nothing in Visual Basic) or is an empty string, we recommend that your provider throw an exception.
If any of the specified roleNames is a null reference (Nothing in Visual Basic) or is an empty string, we recommend that your provider throw an exception.
If your data source supports transactions, we recommend that you include each add operation in a transaction and that you roll back the transaction and throw an exception if any add operation fails.
The following code example shows a sample implementation of the AddUsersToRoles method.
Public Overrides Sub AddUsersToRoles(usernames As String(), rolenames As String()) For Each rolename As String In rolenames If rolename Is Nothing OrElse rolename = "" Then _ Throw New ProviderException("Role name cannot be empty or null.") If Not RoleExists(rolename) Then _ Throw New ProviderException("Role name not found.") Next For Each username As String in usernames If username Is Nothing OrElse username = "" Then _ Throw New ProviderException("User name cannot be empty or null.") If username.Contains(",") Then _ Throw New ArgumentException("User names cannot contain commas.") For Each rolename As String In rolenames If IsUserInRole(username, rolename) Then Throw New ProviderException("User is already in role.") End If Next Next Dim conn As OdbcConnection = New OdbcConnection(connectionString) Dim cmd As OdbcCommand = New OdbcCommand("INSERT INTO UsersInRoles " & _ " (Username, Rolename, ApplicationName) " & _ " Values(?, ?, ?)", conn) Dim userParm As OdbcParameter = cmd.Parameters.Add("@Username", OdbcType.VarChar, 255) Dim roleParm As OdbcParameter = cmd.Parameters.Add("@Rolename", OdbcType.VarChar, 255) cmd.Parameters.Add("@ApplicationName", OdbcType.VarChar, 255).Value = ApplicationName Try conn.Open() For Each username As String In usernames For Each rolename As String In rolenames userParm.Value = username roleParm.Value = rolename cmd.ExecuteNonQuery() Next Next Catch e As OdbcException ' Handle exception. Finally conn.Close() End Try End Sub