中断客户端

1. Select 'alter system kill session ' || Chr(39) || a.Sid || ',' || a.Serial# ||
   
2.        Chr(39) || ' immediate' Sql,
   
3.        a.Program,
   
4.        b.Ip
   
5.   From Gv$session a,Zlclients b
   
6.  Where a.Terminal = b.工作站
   
7.    And Upper(a.Program) In ('ZL9LABPRINTSVR.EXE',
   
8.                             'ZL9LABRECEIV.EXE',
   
9.                             'ZL9LABTCPSVR.EXE',
   
10.                             'ZL9LISCOMM.EXE',
    
11.                             'ZL9WIZARDMAIN.EXE',
    
12.                             'ZLACTMAIN.EXE',
    
13.                             'ZLHIS+.EXE',
    
14.                             'ZLHISCRUST.EXE',
    
15.                             'ZLLISRECEIVESEND.EXE',
    
16.                             'ZLNEWQUERY.EXE',
    
17.                             'ZLORCLCONFIG.EXE',
    
18.                             'ZLPACSBROWSERSTATION.EXE',
    
19.                             'ZLPACSSRV.EXE',
    
20.                             'ZLPEISAUTOANALYSE.EXE',
    
21.                             'ZLRPTSQLADJUST.EXE',
    
22.                             'ZLRUNAS.EXE',
    
23.                             'ZLSVRNOTICE.EXE',
    
24.                             'ZLSVRSTUDIO.EXE',
    
25.                             'ZLWIZARDSTART.EXE',
    
26.                             'VB6.EXE')
    
27.    And (a.Terminal <> Userenv('terminal') Or
    
28.        a.Terminal = Userenv('terminal') And
    
29.        Upper(a.Program) Not In ('VB6.EXE', 'ZLSVRSTUDIO.EXE'))
    
30.  Order By a.Terminal, a.Program

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/28878983/viewspace-2133931/，如需转载，请注明出处，否则将追究法律责任。

转载于:http://blog.itpub.net/28878983/viewspace-2133931/