Can't email using utl_smtp

From: Pavel Vetesnik <Pavel.Vet_at_volny.cz>
Date: Tue, 3 Jun 2003 09:53:35 +0200
Message-ID: <bbhk60$m7g$1_at_ns.felk.cvut.cz>

Hello,

[Quoted] I tried to send emails using utl_smtp package (on Oracle 8i), but I was not succesfull.

When sending email I get no error message or warning, but the email doesn't arrive. Please can you help me with this? Thank you in advance. My code is below.

Pavel

---

PROCEDURE email_test_message
IS

    mailhost    VARCHAR2(64) := 'jupiter.stk.cz';
    sender      VARCHAR2(64) := 'Pavel.Vet_at_volny.cz';
    recipient   VARCHAR2(64) := 'P.Vetesnik_at_stk.cz';

    mail_conn utl_smtp.connection;
BEGIN
    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, 'Subject: Testing....!'||utl_tcp.CRLF);
    utl_smtp.write_data(mail_conn, 'To: P.Vetesnik_at_stk.cz'||utl_tcp.CRLF);
    utl_smtp.write_data(mail_conn, 'From: Pavel Vetesnik'|| utl_tcp.CRLF);

    utl_smtp.write_data(mail_conn, utl_tcp.CRLF);     utl_smtp.write_data(mail_conn, CHR(10)||'This is just for test.....' || utl_tcp.CRLF);

    utl_smtp.close_data(mail_conn);
    utl_smtp.quit(mail_conn);

    htp.p('Email.....');

    EXCEPTION WHEN OTHERS THEN

        htp.htmlopen;
        htp.p('<TITLE>Error</TITLE>');
        htp.headclose;
        htp.bodyopen();
        htp.p('<TABLE
border=1><TR><TD><B>'||SQLERRM||'</B></TD></TR></TABLE>');
        htp.bodyclose;
        htp.htmlclose;

END; Received on Tue Jun 03 2003 - 09:53:35 CEST