SMTP

Question

없이 PL/SQL을 사용하여 메일을 보낼 다른 SMTP를 사용하여 제외 오라클에서 이메일을 보낼 수있는 방법이 있나요 :

이 친절하게 몇 가지 예를 가능하다면 어떤 방법이 있는지 알려는.

Answer 1

Starting from Oracle 8i release 8.1.6, one can send E-mail messages directly from PL/SQL using either the UTL_TCP or UTL_SMTP packages.

UTL_TCP 메일을 보내기

CREATE OR REPLACE PROCEDURE SEND_MAIL (
    msg_from varchar2 := 'oracle', 
    msg_to  varchar2, 
    msg_subject varchar2 := 'E-Mail message from your database', 
    msg_text varchar2 := ) 
IS 
    c utl_tcp.connection; 
    rc integer; 
BEGIN 
    c := utl_tcp.open_connection('127.0.0.1', 25);  -- open the SMTP port 25 on local machine 
    dbms_output.put_line(utl_tcp.get_line(c, TRUE)); 
    rc := utl_tcp.write_line(c, 'HELO localhost'); 
    dbms_output.put_line(utl_tcp.get_line(c, TRUE)); 
    rc := utl_tcp.write_line(c, 'MAIL FROM: '||msg_from); 
    dbms_output.put_line(utl_tcp.get_line(c, TRUE)); 
    rc := utl_tcp.write_line(c, 'RCPT TO: '||msg_to); 
    dbms_output.put_line(utl_tcp.get_line(c, TRUE)); 
    rc := utl_tcp.write_line(c, 'DATA');     -- Start message body 
    dbms_output.put_line(utl_tcp.get_line(c, TRUE)); 
    rc := utl_tcp.write_line(c, 'Subject: '||msg_subject); 
    rc := utl_tcp.write_line(c,); 
    rc := utl_tcp.write_line(c, msg_text); 
    rc := utl_tcp.write_line(c, '.');     -- End of message body 
    dbms_output.put_line(utl_tcp.get_line(c, TRUE)); 
    rc := utl_tcp.write_line(c, 'QUIT'); 
    dbms_output.put_line(utl_tcp.get_line(c, TRUE)); 
    utl_tcp.close_connection(c);       -- Close the connection 
END; 
/

-- Test it: 
set serveroutput on 

exec send_mail(msg_to =>'you@yourdomain.com'); 

exec send_mail(msg_to =>'you@yourdomain.com', - 
      msg_text=>'Look Ma, I can send mail from plsql' - 
      );