declare
ora_user varchar2(30) default 'SCOTT';
begin
execute immediate 'alter user '||ora_user||' account lock';
for crs in (select sid,serial# from v$session where username = ora_user) loop
execute immediate 'alter system kill session '''||crs.sid||','||crs.serial#||'''';
end loop;
end;
/
来自 “ ITPUB博客 ” ,链接:https://blog.itpub.net/38542/viewspace-914205/ ,如需转载,请注明出处,否则将追究法律责任。