1 . 使用資料庫中,可能出現死鎖, 導致程式 無法正常使用. Create procedure [dbo].[sp_who_lock] ( @bKillPID Bit=0 -- 0: 查詢 1: 結束掉相對應的死鎖ID (可能導致數據異常)) as begin declare @spid int ...
1 . 使用資料庫中,可能出現死鎖, 導致程式 無法正常使用.
Create procedure [dbo].[sp_who_lock]
(
@bKillPID Bit=0 -- 0: 查詢 1: 結束掉相對應的死鎖ID (可能導致數據異常)
)
as
begin
declare @spid int
declare @blk int
declare @count int
declare @index int
declare @lock tinyint
set @lock=0
create table #temp_who_lock
(
id int identity(1,1),
spid int,
blk int
)
if @@error<>0 return @@error
insert into #temp_who_lock(spid,blk)
select 0 ,blocked
from (select * from master..sysprocesses where blocked>0)a
where not exists(select * from master..sysprocesses where a.blocked =spid and blocked>0)
union select spid,blocked from master..sysprocesses where blocked>0
if @@error<>0 return @@error
select @count=count(*),@index=1 from #temp_who_lock
if @@error<>0 return @@error
if @count=0
begin
select '沒有阻塞和死鎖信息'
return 0
end
Declare @SBak Varchar(10)
while @index<=@count
begin
if exists(select 1 from #temp_who_lock a where id>@index and exists(select 1 from #temp_who_lock where id<=@index and a.blk=spid))
begin
set @lock=1
select @spid=spid,@blk=blk from #temp_who_lock where id=@index
select '引起資料庫死鎖的是: '+ CAST(@spid AS VARCHAR(10)) + '進程號,其執行的SQL語法如下'
select @spid, @blk
dbcc inputbuffer(@spid)
dbcc inputbuffer(@blk)
If @bKillPID =1
Begin
Set @SBak=CAST(@blk AS VARCHAR(10))
exec('Kill '+@SBak)
Set @SBak=CAST(@spid AS VARCHAR(10))
exec('Kill '+@SBak)
End
end
set @index=@index+1
end
if @lock=0
begin
set @index=1
while @index<=@count
begin
select @spid=spid,@blk=blk from #temp_who_lock where id=@index
if @spid=0
select '引起阻塞的是:'+cast(@blk as varchar(10))+ '進程號,其執行的SQL語法如下'
else
select '進程號SPID:'+ CAST(@spid AS VARCHAR(10))+ '被' + '進程號SPID:'+ CAST(@blk AS VARCHAR(10)) +'阻塞,其當前進程執行的SQL語法如下'
dbcc inputbuffer(@spid)
dbcc inputbuffer(@blk)
set @index=@index+1
end
end
drop table #temp_who_lock
return 0
end
GO