中斷客戶端

xypincle發表於2017-02-20

  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/,如需轉載,請註明出處,否則將追究法律責任。

相關文章