Compartilhar via


Método Grant (ServerPermissionSet, String[], Boolean)

Grants access to the specified permission to the grantees and the ability to grant access to other users on the instance of SQL Server.

Namespace:  Microsoft.SqlServer.Management.Smo
Assembly:  Microsoft.SqlServer.Smo (em Microsoft.SqlServer.Smo.dll)

Sintaxe

'Declaração
Public Sub Grant ( _
    permission As ServerPermissionSet, _
    granteeNames As String(), _
    grantGrant As Boolean _
)
'Uso
Dim instance As Server
Dim permission As ServerPermissionSet
Dim granteeNames As String()
Dim grantGrant As Boolean

instance.Grant(permission, granteeNames, _
    grantGrant)
public void Grant(
    ServerPermissionSet permission,
    string[] granteeNames,
    bool grantGrant
)
public:
void Grant(
    ServerPermissionSet^ permission, 
    array<String^>^ granteeNames, 
    bool grantGrant
)
member Grant : 
        permission:ServerPermissionSet * 
        granteeNames:string[] * 
        grantGrant:bool -> unit 
public function Grant(
    permission : ServerPermissionSet, 
    granteeNames : String[], 
    grantGrant : boolean
)

Parâmetros

  • granteeNames
    Tipo: array<System. . :: . .String> [] () [] []
    A String array that specifies a list of grantees to be denied access to the set of permissions.
  • grantGrant
    Tipo: System. . :: . .Boolean
    A Boolean property that specifies whether the grantee is given the ability to grant the specified 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.

Exemplos

'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("")