一个删除重做日志文件的参考脚本

适用于windows操作系统，如果是unix系统需修改。

[@more@]

set feedback off
set linesize 300
set pagesize 3000
set serveroutput on
spool d:deletefile.cmd
declare
filepath varchar2(100) ;
begin
filepath := '&1' ;
for rec in (select thread#,sequence#
from v$log_history
where trunc(first_time) = trunc(sysdate - 1)
and sequence# > 991)
loop
dbms_output.put_line('del ' || filepath || '' || rec.thread#
|| '_' || rec.sequence# || '.dbf') ;
end loop ;
end ;
/
spool off
set feedback on
set linesize 80
set pagesize 14
$d:deletefile.cmd
$del d:deletefile.cmd
exit

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

转载于:http://blog.itpub.net/802415/viewspace-823071/