在SQL2000、SQL2005查看阻塞进程的SQL脚本

--查阻塞
/******************************************************************************************************************************************************
整理人：中国风(Roy)

日期:
******************************************************************************************************************************************************/
--SQL2000

declare Roy_lock cursor for
select 
    db_name(dbid),0,blocked
from
    master..sysprocesses a
where
    Blocked>0 and
    not exists(select 1 from Master..Sysprocesses where blocked=a.spid)
union 
select 
    db_name(dbid),spid,blocked
from
    master..sysprocesses a
where
    Blocked>0
declare @DBName sysname,@spid bigint,@Blocked bigint
open Roy_lock
fetch next from Roy_lock into @DBName,@spid,@Blocked
while @@fetch_status=0
begin
    if @spid=0
        print N'鎖定數據庫:'+@DBName+'    語句：'
    else
        print N'鎖定數據庫:'+@DBName+'    進程SPID：'+rtrim(@spid)+' 語句：'
    dbcc inputbuffer(@Blocked)
fetch next from Roy_lock into @DBName,@spid,@Blocked
end
close Roy_lock
deallocate Roy_lock


GO

SQL2005:

with Lock(dbName,spid,blocked,sql_handle)
as
(
select 
    db_name(dbid),0,blocked,sql_handle
from
    master..sysprocesses a
where
    Blocked>0 and
    not exists(select 1 from Master..Sysprocesses where blocked=a.spid)
union 
select 
    db_name(dbid),spid,blocked,sql_handle
from
    master..sysprocesses a
where
    Blocked>0
)
select * from Lock a cross apply     sys.dm_exec_sql_text(a.sql_handle)b