Email mit Anhang

[uminky]

Auf der Grundlage des Package:
http://www.oracle.com/technology/sam...ildemo_sql.txt

habe ich folgedes Script:

Wo ist der Fehler
edit:
Ich bekomme zwar eine mail, aber ohne Anhang. Der Text der in den Anhang soll landet im Body der Mail.

DECLARE

SMTP_CONN UTL_SMTP.CONNECTION ;
cCRLF CHAR(2) := utl_tcp.crlf ;

BEGIN
SMTP_CONN := BEGIN_MAIL( SENDER => '[email protected]'
, RECIPIENTS => '[email protected]'
, SUBJECT => 'Mailtest'
, MIME_TYPE => 'MULTIPART/MIXED'
, PRIORITY => NULL
) ;

WRITE_MB_TEXT( CONN => SMTP_CONN
, MESSAGE => 'Dieses ist eine Testmail' || cCRLF
) ;

BEGIN_ATTACHMENT( CONN => SMTP_CONN
, MIME_TYPE => 'TEXT/PLAIN'
, INLINE => FALSE
, FILENAME => 'Testanhang.txt'
, TRANSFER_ENC => NULL
) ;

WRITE_MB_TEXT( CONN => SMTP_CONN
, MESSAGE => 'Text des Testanhang'
) ;

END_ATTACHMENT( CONN => SMTP_CONN
, LAST => TRUE
) ;

END_MAIL( SMTP_CONN );

END;
/

[jum]

Ja, wo klemmt es denn ?

Wo ist der Fehler

[emetiel]

Mal abgesehen davon, dass
-> cCRLF CHAR(2) := utl_tcp.crlf;
eine überflüssige Zeile ist, da Du utl_tcp.crlf ja auch immer dann schreiben kannst, wenn Du cCRLF schreibst, solltest Du evtl. einen kleinen Tipp geben, was Deinen Fehler betrifft.

gruß
emetiel