在 Oracle中使用UTL_SMTP 进行邮件发送的例子代码

最新推荐文章于 2024-04-08 09:42:51 发布

转载最新推荐文章于 2024-04-08 09:42:51 发布 · 186 阅读

0 ·

CC 4.0 BY-SA版权

原文链接：http://www.cnblogs.com/hcmsxy/archive/2008/07/18/2164059.html

文章标签：

#数据库

本文介绍了一个使用PLSQL编写的发送邮件的过程。该过程利用了UTL_SMTP包来实现邮件的发送功能，详细展示了如何设置SMTP服务器、端口、发件人及收件人的邮箱地址等参数，并通过具体步骤说明了邮件主题与正文内容的构造。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

CREATE OR REPLACE PROCEDURE MAIN.SENDMAIL AS smtpServer varchar2(100) := '10.15.1.2'; smtpPort varchar2(8) :='25'; senderAddress varchar2(100):='huangcm@***.cn'; senderPassowrd varchar2(100):='********'; receiverAddress varchar2(100):='huangcm@***.cn'; mail_subjct varchar2(100):='Subject:'||'About PLSQL ERROR!'; mail_body varchar2(4000):= 'This mail from PLSQL!'; conn utl_smtp.CONNECTION; CRLF VARCHAR2( 2 ):= CHR( 13 ) || CHR( 10 ); BEGIN conn:= utl_smtp.open_connection(smtpServer,smtpPort); utl_smtp.ehlo(conn,smtpServer); utl_smtp.command(conn,'AUTH LOGIN'); utl_smtp.command(conn,utl_raw.cast_to_varchar2(utl_encode.base64_encode(utl_raw.cast_to_raw(senderAddress)))); utl_smtp.command(conn,utl_raw.cast_to_varchar2(utl_encode.base64_encode(utl_raw.cast_to_raw(senderPassowrd)))); utl_smtp.mail( conn,senderAddress); utl_smtp.rcpt( conn,receiverAddress); utl_smtp.open_data(conn); utl_smtp.write_data(conn,'From:'||senderAddress||CRLF); utl_smtp.write_data(conn,'To:'||receiverAddress || CRLF ); utl_smtp.write_data(conn,'Date:'||to_char (sysdate, 'hh24:mi:ss dd-Mon-yyyy')||CRLF); utl_smtp.write_data(conn,mail_subjct||CRLF); utl_smtp.write_data(conn, 'MIME-Version: 1.0' || CRLF); utl_smtp.write_data(conn, 'Content-type: text/html;Charset=GB2312;' || CRLF); utl_smtp.write_data(conn, 'Content-Transfer-Encoding: base64' || CRLF); utl_smtp.write_data(conn, CRLF); utl_smtp.write_raw_data(conn, utl_encode.base64_encode(utl_raw.cast_to_raw(''||CRLF||mail_body))); utl_smtp.write_data(conn, CRLF); utl_smtp.close_data(conn); utl_smtp.quit( conn ); END;

转载于:https://www.cnblogs.com/hcmsxy/archive/2008/07/18/2164059.html