Bonjour à tous.
Je voudrais envoyer un email via PL/SQL pour cela j'ai créé la procedure suivante:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
create or replace
    PROCEDURE send_mail (p_sender       IN VARCHAR2,
                         p_recipient IN VARCHAR2,
                         p_message   IN VARCHAR2)
    as
       l_mailhost VARCHAR2(255) := 'exchange.ma';
       l_mail_conn utl_smtp.connection;
    BEGIN
       l_mail_conn := utl_smtp.open_connection(l_mailhost, 25);
      utl_smtp.helo(l_mail_conn, l_mailhost);
      utl_smtp.mail(l_mail_conn, p_sender);
      utl_smtp.rcpt(l_mail_conn, p_recipient);
      utl_smtp.open_data(l_mail_conn );
      utl_smtp.write_data(l_mail_conn, p_message);
      utl_smtp.close_data(l_mail_conn );
      utl_smtp.quit(l_mail_conn);
   end;
   /
Procedure created.
puis j'execute la procedure:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
 
begin
       send_mail( 'elharet@exchange.ma','peter@exchange.ma','Hello PETER' );
end;
/
Mais il me génère l'erreur suivante:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
ERREUR Ó la ligne 1 :
ORA-29278: erreur passagÞre SMTP : 421 Service not available
ORA-06512: Ó "SYS.UTL_SMTP", ligne 17
ORA-06512: Ó "SYS.UTL_SMTP", ligne 96
ORA-06512: Ó "SYS.UTL_SMTP", ligne 138
ORA-06512: Ó "SYS.SEND_MAIL", ligne 8
ORA-06512: Ó ligne 2