exec master.dbo.sp_who_lock --查看当前死锁进程

exec master.dbo.p_killspid ytsafety--杀掉引起死锁的进程

sp_who_lock如下：

create  procedure sp_who_lock 
as 
begin 
declare @spid int,@bl int, 
@intTransactionCountOnEntry  int, 
        @intRowcount    int, 
        @intCountProperties   int, 
        @intCounter    int

create table #tmp_lock_who ( 
id int identity(1,1), 
spid smallint, 
bl smallint)

IF @@ERROR<>0 RETURN @@ERROR

insert into #tmp_lock_who(spid,bl) select  0 ,blocked 
   from (select * from sysprocesses where  blocked>0 ) a 
   where not exists(select * from (select * from sysprocesses where  blocked>0 ) b 
   where a.blocked=spid) 
   union select spid,blocked from sysprocesses where  blocked>0

IF @@ERROR<>0 RETURN @@ERROR 
  
-- 找到临时表的记录数 
select  @intCountProperties = Count(*),@intCounter = 1 
from #tmp_lock_who

IF @@ERROR<>0 RETURN @@ERROR

if @intCountProperties=0 
  select '现在没有阻塞和死锁信息' as message

-- 循环开始 
while @intCounter <= @intCountProperties 
begin 
-- 取第一条记录 
  select  @spid = spid,@bl = bl 
  from #tmp_lock_who where Id = @intCounter 
begin 
  if @spid =0 
            select '引起数据库死锁的是: '+ CAST(@bl AS VARCHAR(10)) + '进程号,其执行的SQL语法如下' 
else 
            select '进程号SPID：'+ CAST(@spid AS VARCHAR(10))+ '被' + '进程号SPID：'+ CAST(@bl AS VARCHAR(10)) +'阻塞,其当前进程执行的SQL语法如下' 
DBCC INPUTBUFFER (@bl ) 
end

-- 循环指针下移 
set @intCounter = @intCounter + 1 
end

drop table #tmp_lock_who

return 0 
end

GO 
SET QUOTED_IDENTIFIER OFF 
GO 
SET ANSI_NULLS ON 
GO

p_killspid 如下：

SET QUOTED_IDENTIFIER ON 
GO 
SET ANSI_NULLS ON 
GO

create  proc p_killspid 
@dbname varchar(200)    --要关闭进程的数据库名 
as  
    declare @sql  nvarchar(500)  
    declare @spid nvarchar(20)

    declare #tb cursor for 
        select spid=cast(spid as varchar(20)) from master..sysprocesses where dbid=db_id(@dbname) 
    open #tb 
    fetch next from #tb into @spid 
    while @@fetch_status=0 
    begin  
        exec('kill '+@spid) 
        fetch next from #tb into @spid 
    end  
    close #tb 
    deallocate #tb

GO 
SET QUOTED_IDENTIFIER OFF 
GO 
SET ANSI_NULLS ON 
GO

SET QUOTED_IDENTIFIER ON 
GO 
SET ANSI_NULLS ON 
GO