频道分类

Delphi 关闭SQL Server 数据库所有使用连接

作者:admin 来源: 日期:2019/12/1 15:42:01 人气: 标签:

 
use master  
go

create proc KillSpByDbName(@dbname varchar(20))
as
begin
declare @sql nvarchar(500),@temp varchar(1000)
declare @spid int
set @sql='declare getspid cursor for  
select spid from sysprocesses where dbid=db_id('''+@dbname+''')'
exec (@sql)
open getspid
fetch next from getspid into @spid
while @@fetch_status<>-1
begin
 set @temp='kill '+rtrim(@spid)
 exec(@temp)
fetch next from getspid into @spid
end
close getspid
deallocate getspid
end

Use master   
 Exec KillSpByDbName '数据库名称'