SET QUOTED_IDENTIFIER ON

GOSET ANSI_NULLS ON GOALTER procedure sp_who_lockasbegindeclare @spid int,@bl int,@intTransactionCountOnEntry int, @intRowcount int, @intCountProperties int, @intCounter intcreate table #tmp_lock_who (id int identity(1,1),spid smallint,bl smallint)IF @@ERROR<>0 RETURN @@ERRORinsert into #tmp_lock_who(spid,bl) select 0 ,blockedfrom (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>0IF @@ERROR<>0 RETURN @@ERROR-- 找到臨時表的記錄數select @intCountProperties = Count(*),@intCounter = 1from #tmp_lock_whoIF @@ERROR<>0 RETURN @@ERRORif @intCountProperties=0select N'現在沒有阻塞和死鎖信息' as message-- 循環開始while @intCounter <= @intCountPropertiesbegin-- 取第一條記錄select @spid = spid,@bl = blfrom #tmp_lock_who where Id = @intCounter beginif @spid =0 select N'引起數據庫死鎖的是: '+ CAST(@bl AS VARCHAR(10)) + N'進程號,其執行的SQL語法如下'else select N'進程號SPID：'+ CAST(@spid AS VARCHAR(10))+ N'被' + N'進程號SPID：'+ CAST(@bl AS VARCHAR(10)) +N'阻塞,其當前進程執行的SQL語法如下'DBCC INPUTBUFFER (@bl )end-- 循環指針下移set @intCounter = @intCounter + 1enddrop table #tmp_lock_whoreturn 0endGOSET QUOTED_IDENTIFIER OFF GOSET ANSI_NULLS ON GO