http://www.sqle.ru/index.php?action=history&feed=atom&title=Oracle_PL%2FSQL_Tutorial%2FSystem_Packages%2Futl_smtp
Oracle PL/SQL Tutorial/System Packages/utl smtp - История изменений
2026-05-24T19:23:11Z
История изменений этой страницы в вики
MediaWiki 1.30.0
http://www.sqle.ru/index.php?title=Oracle_PL/SQL_Tutorial/System_Packages/utl_smtp&diff=3264&oldid=prev
в 13:45, 26 мая 2010
2010-05-26T13:45:46Z
<p></p>
<table class="diff diff-contentalign-left" data-mw="interface">
<tr style="vertical-align: top;" lang="ru">
<td colspan="1" style="background-color: white; color:black; text-align: center;">← Предыдущая</td>
<td colspan="1" style="background-color: white; color:black; text-align: center;">Версия 13:45, 26 мая 2010</td>
</tr><tr><td colspan="2" style="text-align: center;" lang="ru"><div class="mw-diff-empty">(нет различий)</div>
</td></tr></table>
http://www.sqle.ru/index.php?title=Oracle_PL/SQL_Tutorial/System_Packages/utl_smtp&diff=3265&oldid=prev
Admin: 1 версия
2010-05-26T10:05:48Z
<p>1 версия</p>
<p><b>Новая страница</b></p><div>== send email==<br />
<br />
<br />
<br />
<br />
<!-- start source code --><br />
<br />
<source lang="sql"><br />
SQL> CREATE OR REPLACE PROCEDURE p_send_email<br />
2 (p_mailhost VARCHAR2,<br />
3 p_from_address VARCHAR2,<br />
4 p_to_address VARCHAR2,<br />
5 p_message_text VARCHAR2,<br />
6 p_returnCode OUT NUMBER,<br />
7 p_err_msg OUT VARCHAR2)<br />
8 IS<br />
9 mail_conn utl_smtp.connection;<br />
10 BEGIN<br />
11 mail_conn :=utl_smtp.open_connection(p_mailhost,25);<br />
12 utl_smtp.helo(mail_conn,p_mailhost);<br />
13 utl_smtp.mail(mail_conn,p_from_address);<br />
14 utl_smtp.rcpt(mail_conn,p_to_address);<br />
15 utl_smtp.open_data(mail_conn);<br />
16 utl_smtp.write_data(mail_conn,p_message_text);<br />
17 utl_smtp.close_data(mail_conn);<br />
18 utl_smtp.quit(mail_conn);<br />
19 p_returnCode :=0;<br />
20 EXCEPTION<br />
21 WHEN OTHERS THEN<br />
22 p_returnCode :=SQLCODE;<br />
23 p_err_msg :=SQLERRM;<br />
24 END;<br />
25 /<br />
SQL><br />
SQL> -- Sample code to execute p_send_email<br />
SQL> declare<br />
2 returnCode number;<br />
3 err_msg varchar2(1000);<br />
4 begin<br />
5 p_send_email("mail.c.ru",<br />
6 "b@c.ru",<br />
7 "b@c.ru",<br />
8 "From:"||"B"||CHR(13)||CHR(10)||<br />
9 "Subject:"||"Message from B"||CHR(13)||CHR(10)||<br />
10 CHR(13)||CHR(10)||<br />
11 "This is a test message.",<br />
12 returnCode,<br />
13 err_msg);<br />
14 IF (returnCode <>0)THEN<br />
15 dbms_output.put_line("ERR:"||err_msg);<br />
16 END IF;<br />
17 end;<br />
18 /<br />
SQL></source><br />
<br />
<br />
<br />
== Send out email with utl_smtp==<br />
<br />
<br />
<br />
<br />
<!-- start source code --><br />
<br />
<source lang="sql"><br />
SQL><br />
SQL><br />
SQL> set echo on<br />
SQL><br />
SQL> create or replace<br />
2 PROCEDURE send_mail (p_sender IN VARCHAR2,<br />
3 p_recipient IN VARCHAR2,<br />
4 p_message IN VARCHAR2)<br />
5 as<br />
6 l_mailhost VARCHAR2(255) := "mailhost.yourServer.ru";<br />
7 l_mail_conn utl_smtp.connection;<br />
8 BEGIN<br />
9 l_mail_conn := utl_smtp.open_connection(l_mailhost, 25);<br />
10 utl_smtp.helo(l_mail_conn, l_mailhost);<br />
11 utl_smtp.mail(l_mail_conn, p_sender);<br />
12 utl_smtp.rcpt(l_mail_conn, p_recipient);<br />
13 utl_smtp.open_data(l_mail_conn );<br />
14 utl_smtp.write_data(l_mail_conn, p_message);<br />
15 utl_smtp.close_data(l_mail_conn );<br />
16 utl_smtp.quit(l_mail_conn);<br />
17 end;<br />
18 /<br />
Warning: Procedure created with compilation errors.<br />
SQL></source></div>
Admin