從Oracle9i中傳送電子郵件

2021-09-26 18:50:49 字數 2194 閱讀 1742

oracle的包utl_smtp提供了從資料庫中直接傳送電子郵件的功能,這裡介紹一下其使用方法

網上找到的例子以及oracle文件中的例子都沒有提到authorized的問題,我的測試中使用的是

163的免費信箱,傳送時老是報錯:

ora-20000: failed to send mail due to the following error:

ora-29279: smtp 永久性錯誤: 553 you are not authorized to send mail as , authentication is required

後來在metalink上找到解決方法:要在程式中增加登入smtp伺服器的過程!

下面是儲存過程的源**,注意資料庫伺服器必須要能訪問smtp.163.com

create or replace procedure send_mail (

p_recipient in varchar2,

p_message in varchar2,

p_subject in varchar2 default 'oracle perf report '||to_char(sysdate,'yyyy-mm-dd hh24:mi:ss'),

p_sender in varchar2 default '[email protected]')is

v_mailhost varchar2(30) := '202.108.44.205'; -- smtp伺服器位址

mail_conn utl_smtp.connection;

msg varchar2(4000);

p_user varchar2(30) := 'demo'; -- 登入smtp伺服器的使用者名稱

p_pass varchar2(30) := 'demo'; -- 登入smtp伺服器的密碼

begin

/* 建立要傳送的郵件內容 注意報頭資訊和郵件正文之間要空一行 */

msg := 'date:' ||to_char(sysdate,'dd mon yy hh24:mi:ss') || utl_tcp.crlf ||

'from: ' || p_sender || '' ||utl_tcp.crlf ||

'to: '|| p_recipient || '' ||utl_tcp.crlf||

'subject: '||p_subject || utl_tcp.crlf ||utl_tcp.crlf||

p_message;

-- dbms_output.put_line(msg);

mail_conn := utl_smtp.open_connection(v_mailhost,25);

utl_smtp.helo(mail_conn,v_mailhost);

/* smtp伺服器登入校驗 */

utl_smtp.command(mail_conn, 'auth login');

utl_smtp.command(mail_conn, utl_raw.cast_to_varchar2(utl_encode.base64_encode(utl_raw.cast_to_raw(p_user))));

utl_smtp.command(mail_conn, utl_raw.cast_to_varchar2(utl_encode.base64_encode(utl_raw.cast_to_raw(p_pass))));

utl_smtp.mail(mail_conn,p_sender);

utl_smtp.rcpt(mail_conn,p_recipient);

/* 傳送資料 */

utl_smtp.data(mail_conn, msg);

utl_smtp.quit(mail_conn);

exception

when others then

dbms_output.put_line(dbms_utility.format_error_stack);

dbms_output.put_line(dbms_utility.format_call_stack);

end send_mail;

測試這個儲存過程:

sql> exec send_mail('[email protected]','this

is a oracle send mail demo!!!');

pl/sql procedure successfully completed

解除安裝Oracle 9i

1 停止所有oracle服務 2 刪除登錄檔中的所有關於oracle項 1 在hkey local machine software下,刪除oracle目錄 2 在hkey local machine system controlset001 services下,刪除所有oracle項 3 在hke...

oracle9i解除安裝

今天裝了oracle 9i,後來重灌遇到問題因為解除安裝未乾淨。幾經周折終於成功,現將解除安裝步驟供以後參考 1 停止服務 開啟 服務 然後停止所有oracle服務 2 刪除程式 3 刪除登錄檔中的所有關於oracle項 1 在hkey local machine software下,刪除oracl...

oracle9i解除安裝

今天裝了oracle 9i,後來重灌遇到問題因為解除安裝未乾淨。幾經周折終於成功,現將解除安裝步驟供以後參考 1 停止服務 開啟 服務 然後停止所有oracle服務 2 刪除程式 3 刪除登錄檔中的所有關於oracle項 1 在hkey local machine software下,刪除oracl...