共用方式為

  • 發行項

EnumServerPermissions 方法 (String, ServerPermissionSet)

Enumerates a list of server permissions for a specified grantee and a specified permission on the instance of SQL Server.

命名空間：  Microsoft.SqlServer.Management.Smo
組件：  Microsoft.SqlServer.Smo (在 Microsoft.SqlServer.Smo.dll 中)

語法

'宣告
Public Function EnumServerPermissions ( _
    granteeName As String, _
    permissions As ServerPermissionSet _
) As ServerPermissionInfo()
'用途
Dim instance As Server
Dim granteeName As String
Dim permissions As ServerPermissionSet
Dim returnValue As ServerPermissionInfo()

returnValue = instance.EnumServerPermissions(granteeName, _
    permissions)

public ServerPermissionInfo[] EnumServerPermissions(
    string granteeName,
    ServerPermissionSet permissions
)

public:
array<ServerPermissionInfo^>^ EnumServerPermissions(
    String^ granteeName, 
    ServerPermissionSet^ permissions
)

member EnumServerPermissions : 
        granteeName:string * 
        permissions:ServerPermissionSet -> ServerPermissionInfo[] 

public function EnumServerPermissions(
    granteeName : String, 
    permissions : ServerPermissionSet
) : ServerPermissionInfo[]

參數

傳回值

型別：array<Microsoft.SqlServer.Management.Smo. . :: . .ServerPermissionInfo> [] () [] []
An array of ServerPermissionInfo objects that contains server permission information for the specified grantee and permission on the instance of SQL Server.

備註

Use this method to return an array of ServerPermissionInfo objects that contain information about the permissions currently set on the instance of SQL Server for the specified grantee and for the given set of permissions.

範例

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