Oracle - Enviar E-Mail

 
Vista:

Enviar E-Mail

Publicado por sansarricq (120 intervenciones) el 07/05/2003 23:18:29
Cree un Triggers que me envia un E-Mail cuando se insertan datos, todo funciona peefectamente el unico problema esque cuando se recive el -Email este llega en blanco ( sin el asunto y el texto del mensaje enviado)

Como lo puedo solucionar
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Enviar E-Mail

Publicado por sansarricq (120 intervenciones) el 08/05/2003 18:03:58
Logre que el texto del mensaje aparesca pero no puedo hacer lo mismo para los parametro de From, To, Subject
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Enviar E-Mail

Publicado por Daniel Rodas (1 intervención) el 09/05/2003 00:38:59
Revisa si no estas dando un Clear _block en alguna parte antes de mandar el email.
Exitos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Enviar E-Mail

Publicado por sansarricq (120 intervenciones) el 14/05/2003 22:42:11
este es el codigo de usado
CREATE OR REPLACE PROCEDURE MAIL AS
mailhost VARCHAR2(30); mail_conn utl_smtp.connection;
sender VARCHAR2(60); recipient VARCHAR2(30); recipient2 VARCHAR2(30);
subject VARCHAR2(100); message VARCHAR2(130); xbody RAW(32767);
BEGIN
mailhost := 'mailserver.midominio.cl'; sender := '[email protected]'; recipient := '[email protected]';
message := 'Texto de prueba para Enviar E-Mail por ORACLE';
subject := 'Envio de E-Mail por ORACLE';
mail_conn := utl_smtp.open_connection(mailhost,25);
utl_smtp.helo(mail_conn, mailhost);
utl_smtp.mail(mail_conn, sender);
utl_smtp.rcpt(mail_conn, recipient);
utl_smtp.open_data(mail_conn);
utl_smtp.write_data(mail_conn, utl_tcp.CRLF||'From : ' ||sender|| '<'||sender||'>');
utl_smtp.write_data(mail_conn, utl_tcp.CRLF||'To : ' ||recipient|| '<'||recipient||'>');
utl_smtp.write_data(mail_conn, utl_tcp.CRLF||'Subject : Prueba --> '||subject);
utl_smtp.write_data(mail_conn, utl_tcp.CRLF);
xbody := utl_raw.cast_to_raw(message);
utl_smtp.write_raw_data(mail_conn,xbody);
utl_smtp.close_data(mail_conn);
utl_smtp.quit(mail_conn);
Exception
When utl_smtp.transient_error OR utl_smtp.permanent_error Then
utl_smtp.quit(mail_conn);
raise_application_error(-20000,' Fallo en Envio de E-Mail,Error '||sqlerrm);
END;
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar