Método EnumObjectPermissions (String, ObjectPermissionSet)
Enumerates a list of permissions for objects in the database that belong to the specified user and limited to the specified permission set.
Namespace: Microsoft.SqlServer.Management.Smo
Assembly: Microsoft.SqlServer.Smo (em Microsoft.SqlServer.Smo.dll)
Sintaxe
'Declaração
Public Function EnumObjectPermissions ( _
granteeName As String, _
permissions As ObjectPermissionSet _
) As ObjectPermissionInfo()
'Uso
Dim instance As Database
Dim granteeName As String
Dim permissions As ObjectPermissionSet
Dim returnValue As ObjectPermissionInfo()
returnValue = instance.EnumObjectPermissions(granteeName, _
permissions)
public ObjectPermissionInfo[] EnumObjectPermissions(
string granteeName,
ObjectPermissionSet permissions
)
public:
array<ObjectPermissionInfo^>^ EnumObjectPermissions(
String^ granteeName,
ObjectPermissionSet^ permissions
)
member EnumObjectPermissions :
granteeName:string *
permissions:ObjectPermissionSet -> ObjectPermissionInfo[]
public function EnumObjectPermissions(
granteeName : String,
permissions : ObjectPermissionSet
) : ObjectPermissionInfo[]
Parâmetros
- granteeName
Tipo: System. . :: . .String
A String value that specifies the user who is the owner of the objects.
- permissions
Tipo: Microsoft.SqlServer.Management.Smo. . :: . .ObjectPermissionSet
A DatabasePermissionSet object that limits the enumerated list to those listed.
Valor de retorno
Tipo: array<Microsoft.SqlServer.Management.Smo. . :: . .ObjectPermissionInfo> [] () [] []
An array of ObjectPermissionInfo objects that contains a list of permissions for the specified owner and permission set.
Exemplos
The example shows the EnumServerPermissions method, which is used like the EnumObjectPermissions method.
'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("")
Consulte também