DECLARE @LOCALSPID AS BIGINT SET @LOCALSPID=@@SPID
DECLARE @INFOCOUNT AS BIGINT
DECLARE @I AS BIGINT SET @I=0
DECLARE @SPID AS VARCHAR(50)
DECLARE @SPINFO AS TABLE (ID BIGINT IDENTITY(1,1),SPID BIGINT,[Status] VARCHAR(100),[LOGIN] VARCHAR(100),HostName VARCHAR(100),BlkBy VARCHAR(100), DBName VARCHAR(100),Command VARCHAR(100),CPUTime BIGINT,DiskIO BIGINT,LastBatch VARCHAR(50),ProgramName VARCHAR(500),SPID1 BIGINT,REQUESTID BIGINT)
DECLARE @EVENTINFO AS TABLE (ID BIGINT IDENTITY(1,1),EventType VARCHAR(100),Parameters INT,EventInfo VARCHAR(MAX),SPID BIGINT)
INSERT INTO @SPINFO(SPID, [Status], [LOGIN], HostName, BlkBy, DBName, Command,CPUTime, DiskIO, LastBatch, ProgramName, SPID1, REQUESTID)
EXEC('sp_who2')
SET @INFOCOUNT=(SELECT COUNT(*) FROM @SPINFO)
WHILE(@I<@INFOCOUNT)
BEGIN
SET @I=@I+1
SET @SPID=(SELECT SPID FROM @SPINFO WHERE ID=@I)
INSERT INTO @EVENTINFO(EventType, Parameters, EventInfo)
EXEC ('DBCC INPUTBUFFER('+ @SPID +')')
UPDATE @EVENTINFO SET SPID = @SPID WHERE SPID IS NULL
END

SELECT * FROM @EVENTINFO E
INNER JOIN @SPINFO H ON H.SPID=E.SPID
WHERE H.HostName=HOST_NAME()