如何在线断开所有与数据库的连接对象

点击次数：243 创建日期：11-1-2007 录入：cn-web.com 字体:[大中小] 点评：

有时我们在对数据库操作中会遇到还存在数据库连接而拒绝操作的情况，以下存储过程可以实现在线断开所有与数据库的连接：

CREATE PROC L_spClearDbConnections
    @DbName    VARCHAR(30)
AS
--清除某个数据库的所有数据库连接
--RickyLin 2007-11-1
DECLARE @SPID    INT
DECLARE @SqlForClear    NVARCHAR(100)

DECLARE curID CURSOR FORWARD_ONLY READ_ONLY FOR (
    SELECT SPID
    FROM Master.dbo.SysProcesses
    WHERE DB_Name(DBID) = @DbName)
OPEN curID
FETCH NEXT FROM curID INTO @SPID
WHILE @@Fetch_Status = 0
BEGIN
    SET @SqlForClear = N'KILL ' + Cast(@SPID AS NVARCHAR(10))
    EXEC sp_ExecuteSql @SqlForClear
    IF @@Error = 0
        PRINT '已清除连接：' + Cast(@SPID AS VARCHAR(10))
    FETCH NEXT FROM curID INTO @SPID
END
CLOSE curID
DEALLOCATE curID
PRINT '对数据库“' + @DbName + '”的连接清除操作完毕'