5.45.txt

来自「delphi renyuanguanlixinxioxitong」· 文本 代码 · 共 23 行

CONN  sys/oracle AS SYSDBA;

CREATE TABLE event_table(
  event VARCHAR2(30),--记录系统事件名称
  time DATE)--记录事件发生的事件
/
CREATE OR REPLACE TRIGGER tr_startup
AFTER STARTUP ON DATABASE
BEGIN
  INSERT INTO  event_table 
  VALUES(ora_sysevent,sysdate);
END tr_startup ;
/
CREATE OR REPLACE TRIGGER tr_shutdown
BEFORE SHUTDOWN ON DATABASE
BEGIN
  INSERT INTO event_table 
  VALUES(ora_sysevent,sysdate);
END tr_shutdown ;
/