以下的文章主要是以實(shí)例演示的方式來(lái)講解如何正確的執(zhí)行Oracle（Oracle培訓(xùn) ）發(fā)送郵件，以下的文章就就是對(duì)其實(shí)際的操作步驟的講解，如果你對(duì)其相關(guān)的實(shí)際操作有興趣的話，你就可以對(duì)以下的文章點(diǎn)擊觀看了。
執(zhí)行Oracle發(fā)送郵件的正確操作步驟：
LINUX AS3+Oracle 9.2||10.20.
從Oracle發(fā)送郵件：
示例如下：
具體的測(cè)試環(huán)境：LINUX AS3 ， Oracle 9.0.2.4
1.SQL》 select * from v$version;
2.BANNER
3.Oracle9i Enterprise Edition Release 9.2.0.4.0 - Production
4.PL/SQL Release 9.2.0.4.0 - Production
5.CORE 9.2.0.3.0 Production
6.TNS for Linux： Version 9.2.0.4.0 - Production
7.NLSRTL Version 9.2.0.4.0 - Production
8.SQL》 select * from v$version;
9.Oracle Database 10g Enterprise Edition Release 10.2.0.1.0 - Prod
10.PL/SQL Release 10.2.0.1.0 - Production
11.CORE 10.2.0.1.0 Production
12.TNS for Linux： Version 10.2.0.1.0 - Production
13.NLSRTL Version 10.2.0.1.0 - Production
MAIL服務(wù)器為WIN2003，WINMAIL
1.保證ORACLE服務(wù)器到MAIL服務(wù)器網(wǎng)絡(luò)暢通，25端口打開
2.創(chuàng)建Oracle發(fā)送郵件的procedure如下：
1.CREATE OR REPLACE PROCEDURE SEND_MAIL
(as_sender in varchar2， --郵件發(fā)送者
as_recp in varchar2， --郵件接收者
as_subject in varchar2， --郵件標(biāo)題
as_msg_body in varchar2) --郵件內(nèi)容
1.IS
2.ls_mailhost varchar2(30) ：= ‘mail server’; -- address or IP
3.lc_mail_conn utl_smtp.connection;
4.ls_subject varchar2(100);
5.ls_msg_body varchar2(20000);
6.ls_username varchar2(256) ：= ‘usercode’;
7.ls_password varchar2(256) ：= ‘password’;
8.BEGIN
9.lc_mail_conn ：= utl_smtp.open_connection(ls_mailhost， 25);
10.utl_smtp.helo(lc_mail_conn， ls_mailhost);
11.utl_smtp.command(lc_mail_conn， ‘AUTH LOGIN’);
12.utl_smtp.command(lc_mail_conn， demo_base64.encode(utl_raw.cast_to_raw(ls_username)));
13.utl_smtp.command(lc_mail_conn， demo_base64.encode(utl_raw.cast_to_raw(ls_password)));
14.ls_subject ：= ‘Subject： [’ || upper(sys_context(‘userenv’， ‘db_name’)) || ‘] - ’ || as_subject;
15.ls_msg_body ：= as_msg_body;
utl_smtp.mail(lc_mail_conn， ‘《’||as_sender||‘》’); --這里的‘《’ 一定要寫，不然會(huì)出現(xiàn)permanent error
utl_smtp.rcpt(lc_mail_conn， ‘《’||as_recp||‘》’);--這里的‘《’ 一定要寫，不然會(huì)出現(xiàn)permanent error
1.utl_smtp.open_data(lc_mail_conn);
2.ls_msg_body ：= ‘From： ’ || as_sender || chr(13) || chr(10) || ‘To： ’ || as_recp || chr(13) || chr(10) || ls_subject ||
3.chr(13) || chr(10) || chr(13) || chr(10) || ls_msg_body;
utl_smtp.write_raw_data(lc_mail_conn， utl_raw.cast_to_raw(ls_msg_body)); --這樣寫subject可以支持中文但body內(nèi)容不支持中文;
-- utl_smtp.write_data(lc_mail_conn， ls_msg_body); --這樣寫subject不支持中文
1.utl_smtp.close_data(lc_mail_conn);
2.utl_smtp.quit(lc_mail_conn);
3.EXCEPTION
4.WHEN UTL_SMTP.INVALID_OPERATION THEN
5.dbms_output.put_line(‘invalid operation’);
6.WHEN UTL_SMTP.TRANSIENT_ERROR THEN
7.dbms_output.put_line(‘transient error’);
8.WHEN UTL_SMTP.PERMANENT_ERROR THEN
9.dbms_output.put_line(‘permanent error’);
10.WHEN OTHERS THEN
11.dbms_output.put_line(‘others’);
12.end send_mail;
13.
3.執(zhí)行Oracle發(fā)送郵件：
1.exec send_mail(‘heyu@163.net’，‘admin@163.net’，‘我我’，‘this is a oracle test mail’);
注意事項(xiàng)：上面的過(guò)程如果在編譯中出現(xiàn)demo_base64.encode must be declared，請(qǐng)大家創(chuàng)建下面的包和包體;
1.CREATE OR REPLACE PACKAGE demo_base64 IS
2.-- Base64-encode a piece of binary data.
3.--
4.-- Note that this encode function does not split the encoded text into
5.-- multiple lines with no more than 76 bytes each as required by
6.-- the MIME standard.
以上的相關(guān)內(nèi)容就是對(duì)Oracle發(fā)送郵件的介紹，望你能有所收獲。