Oracle9i新特性之数据库监控系列详解

　2007-05-12 12:25:07　来源：WEB开发网　闂備線娼уΛ鎾箯閿燂拷

濠电姭鎷冮崨顓濈捕闂侀潧娲ゅú銊╁焵椤掍胶鈯曢柕鍥╁仧缁辩偤鏁撻敓锟�闂備線娼уΛ鎾箯閿燂拷　　闂備胶枪缁绘鈻嶉弴銏犳瀬闁绘劕鐏氱€氼剟姊洪崹顕呭剰闁逞屽墮缁夊綊寮婚妸褉鍋撻棃娑欏暈闁伙綀浜埀顒傛暬閸嬪﹪宕伴弽褏鏆﹂柨鐕傛嫹

核心提示：以下两个过程呢，其实是辅助过程，Oracle9i新特性之数据库监控系列详解，一个是完成写日志，一个是完成发邮件，在以后的程序中，可能会经常用到

以下两个过程呢，其实是辅助过程，一个是完成写日志，一个是完成发邮件，在以后的程序中，可能会经常用到。

1、写日志过程　　name:sp_Write_log 　　parameter:textContext in varchar2　日志内容　　create date:2003-06-01 　　creater:chen jiping 　　desc: •写日志,把内容记到服务器指定目录下　　•必须配置Utl_file_dir初始化参数，　　并保证日志路径与Utl_file_dir路径一致或者是其中一个　　　　create or replace PROCEDURE sp_Write_log(textContext VARCHAR2) 　　IS 　　file_handle　　　UTL_FILE.file_type; 　　Write_content　　VARCHAR2(1024); 　　Write_file_name　VARCHAR2(50); 　　BEGIN 　　--打开文件　　--Write_file_name := rtrim(to_char(SYSDATE,'YYYY-MM-DD'))||'.log'; 　　Write_file_name := 'db108_alert.log'; 　　file_handle　　 := UTL_FILE.FOPEN('/u01/product/admin/ora81/logs',Write_file_name,'a'); 　　Write_content　 := to_char(SYSDATE,'yyyy-mm-dd hh24:mi:ss')||'||'||textContext; 　　--写文件　　IF UTL_FILE.IS_OPEN(file_handle) THEN 　　UTL_FILE.PUT_LINE(file_handle,Write_content); 　　END IF; 　　--关闭文件　　UTL_FILE.Fclose(file_handle); 　　EXCEPTION 　　WHEN OTHERS THEN 　　IF UTL_FILE.IS_OPEN(file_handle) THEN 　　UTL_FILE.Fclose(file_handle); 　　END IF; 　　END sp_Write_log;