Enviar EMAIL com ANEXO pelo Oracle 10 g

[Fábio PradoParticipante]

samuraix,

Se vc vai enviar e-mails sem anexos ou com anexos de até 32k, recomendo o uso da package UTL_MAIL. Ela não vem instalada por padrão, então vc terá que instalar ela através dos scripts $ORACLE_HOME/rdbms/admin/utlmail.sql e $ORACLE_HOME/rdbms/admin/prvtmail.plb. Após instalar a package, será necessário configurar também o parametro de sistema SMTP_OUT_SERVER para conter o nome de um servidor de smtp dentro da sua rede.

Para enviar e-mail (sem anexo), segue um exemplo de código abaixo:

    UTL_MAIL.SEND(SENDER => P_EMAIL_ORIGEM, 
              RECIPIENTS => P_EMAIL_DESTINO,
              CC => P_EMAIL_CC_DESTINO,
              BCC => P_EMAIL_CCO_DESTINO,
              SUBJECT => P_ASSUNTO,
              MESSAGE => P_MSG,                  
              MIME_TYPE => 'text/plain; charset=iso-8859-1');      

Se precisar enviar com anexo até 32k, use UTLMAIL.SEND_ATTACH_RAW ou UTLMAIL.SEND_ATTACH_VARCHAR2. Se o anexo for maior que 32k, será necessário usar a package UTL_SMTP, que é bem mais "trabalhosa" de usar. Eu criei uma procedure que facilita o envio de email e em breve disponibilizarei ela em um artigo do meu blog!

[]s

Fábio Prado
http://www.fabioprado.net