Форум: "Базы";
Текущий архив: 2004.01.13;
Скачать: [xml.tar.bz2];
ВнизКак получить список узеров работающих в данный момент с базой Найти похожие ветки
← →
Term (2003-12-16 10:59) [0]Как получить список узеров работающих в данный момент с базой
← →
Term (2003-12-16 11:15) [1]ну ктонить
← →
Ega23 (2003-12-16 11:51) [2]Вот скрипт, писался правда давно, надо докрутить. Выдает полное содержание системных процессов. Из них можешь вытащить, какой юзер работает.
set nocount on
print "Информация о системных процессах"
select spid,db=cast(b.name as varchar(16)),
nt_username=cast(nt_username as varchar(16)),
hostname=cast(hostname as varchar(16)),
loginame=cast(loginame as varchar(16)),
program_name=cast(program_name as varchar(20)),
blocked,waittime,lastwaittype,waitresource,
p.dbid,uid,cpu,physical_io,[memusage],login_time,
last_batch ,open_tran,p.status,
hostprocess ,cmd,
net_address,net_library
--login_time,last_batch,cmd,lastwaittype
into #xx
from master..sysprocesses p, master..sysdatabases b
where p.dbid=b.dbid
order by b.dbid, p.last_batch desc
set nocount off
select * from #xx
set nocount on
declare @spid int
declare Cur cursor local static for select spid from #xx
open Cur
while 0 = 0
Begin
fetch next from Cur into @spid
if @@fetch_status <> 0 BREAK
print "spid=" +cast(@spid as varchar)
dbcc inputbuffer(@spid)
end
close Cur
deallocate Cur
drop table #xx
Go
--*************************************
-- dbcc inputbuffer(8)
/*
select * from master..sysprocesses
spid
blocked
waittime lastwaittype
waitresource
dbid uid cpu physical_io
memusage login_time
last_batch
open_tran
status
program_name
hostprocess
cmd
nt_domain
nt_username
net_address
net_library
loginame
--kpid
--waittype
--ecid
--sid
-- nt_domain
--context_info
*/
← →
kaif (2003-12-16 14:09) [3]На палитре Interbase есть компонент IBDatabaseInfo. У него есть свойство UserNames, в котором находится спискок юзеров, подключенных в данный момент к базе. (Точнее не список юзеров, а список соединений). Если юзер имеет 2 соединения (2 attachments), то он в списке присуствует 2 раза.
К списку можно обращаться как к обычному TStrings.
← →
Ega23 (2003-12-16 14:54) [4]Блин, а я, почему-то, решил что у тебя MS SQL. Для FB не знаю.
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2004.01.13;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.008 c