共用方式為


EnumLocks 方法

Enumerates a list of all current locks held on the database.

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

語法

'宣告
Public Function EnumLocks As DataTable
'用途
Dim instance As Database
Dim returnValue As DataTable

returnValue = instance.EnumLocks()
public DataTable EnumLocks()
public:
DataTable^ EnumLocks()
member EnumLocks : unit -> DataTable 
public function EnumLocks() : DataTable

傳回值

型別:System.Data. . :: . .DataTable
A DataTable object value that contains a list of locks held on the database and information about the type and location of the locks. The table describes the different columns of the returned DataTable.

Column

Data type

Description

RequestorSpid

Int32

The system process ID value of the process that is holding a lock on a database resource.

LockType

String

The description of the type of lock. See the syslockinfo table for a description of different lock types.

Database

String

The name of the database on which the lock is held.

Table

String

The name of the table on which the lock is held. This field contains a value only if the lock is held on a table.

Index

String

The name of the index on which the lock is held. This field contains a value only if the lock is held on an index.

Status

Int32

The status of the lock, which can be one of the following:

1 = Granted.

2 = Converting.

3 = Waiting.

範例

The example runs a Server object enumeration method, but extracting the information from the DataTable object is the same for Database enumeration methods.

'Connect to the local, default instance of SQL Server.
Dim srv As Server
srv = New Server
'Call the EnumCollations method and return collation information to DataTable variable.
Dim d As DataTable
'Select the returned data into an array of DataRow.
d = srv.EnumCollations
'Iterate through the rows and display collation details for the instance of SQL Server.
Dim r As DataRow
Dim c As DataColumn
For Each r In d.Rows
    Console.WriteLine("============================================")
    For Each c In r.Table.Columns
        Console.WriteLine(c.ColumnName + " = " + r(c).ToString)
    Next
Next