Sources
Delphi Russian Knowledge Base
DRKB - база знаний по Дельфи в рунете, составленная Виталием Невзоровым

Отключить пользователя и прервать все его запросы

01.01.2007
Vit

declare @pid int, @sql varchar(100)

Declare p cursor  For
  select spid from  master.dbo.sysprocesses
  where sid = suser_sid(@User)

Open p 
Fetch next from p into @pid
While @@Fetch_status=0
  begin
    Set @sql='Kill '+cast(@pid as varchar(10))
    Exec(@sql)
    Fetch next from p into @pid
  end 
Close p
Deallocate p

Пользователь будет отключен и все его запросы прерваны, но код не мешает ему вновь подсоединиться.

Previous page:
Модуль, содержащий несколько удобств для работы с MS SQL посредством ADO
Top:
DRKB
Next page:
Сохранить значение текстовой переменной в файле