Server.Grant Method (ServerPermissionSet, String, Boolean)
Grants access to the specified permission to the grantee and the ability to grant access to other users on the instance of SQL Server.
Namespace: Microsoft.SqlServer.Management.Smo
Assembly: Microsoft.SqlServer.Smo (in Microsoft.SqlServer.Smo.dll)
Syntax
'Declaration
Public Sub Grant ( _
permission As ServerPermissionSet, _
granteeName As String, _
grantGrant As Boolean _
)
'Usage
Dim instance As Server
Dim permission As ServerPermissionSet
Dim granteeName As String
Dim grantGrant As Boolean
instance.Grant(permission, granteeName, _
grantGrant)
public void Grant(
ServerPermissionSet permission,
string granteeName,
bool grantGrant
)
public:
void Grant(
ServerPermissionSet^ permission,
String^ granteeName,
bool grantGrant
)
member Grant :
permission:ServerPermissionSet *
granteeName:string *
grantGrant:bool -> unit
public function Grant(
permission : ServerPermissionSet,
granteeName : String,
grantGrant : boolean
)
Parameters
- permission
Type: Microsoft.SqlServer.Management.Smo.ServerPermissionSet
A ServerPermissionSet object that specifies the permission.
- granteeName
Type: System.String
A String value that specifies the grantee to be denied specified set of permissions.
- grantGrant
Type: System.Boolean
A Boolean property that specifies whether the grantee is given the ability to grant the set of permissions to other users on the instance of SQL Server.
If True, the grantee is given the ability to grant the specified set of permissions to other users on the instance of SQL Server.
If False, the grantee is not given the ability to grant the specified set of permissions to other users on the instance of SQL Server.
Examples
'Connect to the local, default instance of SQL Server.
Dim svr As Server
svr = New Server()
'Define a ServerPermissionSet that contains permission to Create Endpoint and Alter Any Endpoint.
Dim sps As ServerPermissionSet
sps = New ServerPermissionSet(ServerPermission.CreateEndpoint)
sps.Add(ServerPermission.AlterAnyEndpoint)
'This sample assumes that the grantee already has permission to Create Endpoints.
'Enumerate and display the server permissions in the set for the grantee specified in the vGrantee string variable.
Dim spis As ServerPermissionInfo()
spis = svr.EnumServerPermissions(vGrantee, sps)
Dim spi As ServerPermissionInfo
Console.WriteLine("=================Before revoke===========================")
For Each spi In spis
Console.WriteLine(spi.Grantee & " has " & spi.PermissionType.ToString & " permission.")
Next
Console.WriteLine(" ")
'Remove a permission from the set.
sps.Remove(ServerPermission.CreateEndpoint)
'Revoke the create endpoint permission from the grantee.
svr.Revoke(sps, vGrantee)
'Enumerate and display the server permissions in the set for the grantee specified in the vGrantee string variable.
spis = svr.EnumServerPermissions(vGrantee, sps)
Console.WriteLine("=================After revoke============================")
For Each spi In spis
Console.WriteLine(spi.Grantee & " has " & spi.PermissionType.ToString & " permission.")
Next
Console.WriteLine(" ")
'Grant the Create Endpoint permission to the grantee.
svr.Grant(sps, vGrantee)
'Enumerate and display the server permissions in the set for the grantee specified in the vGrantee string variable.
spis = svr.EnumServerPermissions(vGrantee, sps)
Console.WriteLine("=================After grant=============================")
For Each spi In spis
Console.WriteLine(spi.Grantee & " has " & spi.PermissionType.ToString & " permission.")
Next
Console.WriteLine("")
See Also