Мне нужно отправить вложения по электронной почте, по процедуре pl sql Я нашел некоторый код на базовом веб-сайте oracle, но вложения не отправлены, как я могу отправить один BLOB-файл или несколько файлов во вложениях, таких как PDF и Word. objConnection: = UTL_SMTP.open_connection ('mail', 25);
UTL_SMTP.helo (objConnection, 'mail');
UTL_SMTP.command (objConnection, 'AUTH LOGIN');
UTL_SMTP.command (objConnection,UTL_RAW.CAST_TO_VARCHAR2 (UTL_ENCODE.base64_encode (UTL_RAW.cast_to_raw ('J@GMAIL.COM'))));
UTL_SMTP.mail (objConnection, 'J@GMAIL.COM');
V_TO_EMAIL := 'J@GMAIL.COM';
UTL_SMTP.rcpt (objConnection, 'J@GMAIL.COM');
UTL_SMTP.open_data (objConnection);
UTL_SMTP.write_data (objConnection,'From: ' || 'J@GMAIL.COM' || UTL_TCP.CRLF);
UTL_SMTP.write_data (objConnection, 'To: ' || V_TO_EMAIL || UTL_TCP.CRLF);
UTL_SMTP.write_data (objConnection, 'cc: ' || V_TO_EMAIL || UTL_TCP.CRLF);
UTL_SMTP.write_data (objConnection,'Subject: ' || V_TITLE || UTL_TCP.CRLF);
UTL_SMTP.write_data (objConnection,'MIME-Version: ' || '1.0' || UTL_TCP.CRLF);
UTL_SMTP.write_data (objConnection, 'Content-Type: ' || 'text/html;');
UTL_SMTP.write_data (objConnection,'Content-Transfer-Encoding: ' || '"8Bit"' || UTL_TCP.CRLF);
UTL_SMTP.write_data (objConnection, UTL_TCP.CRLF);
UTL_SMTP.write_data (objConnection, UTL_TCP.CRLF || '<HTML>');
UTL_SMTP.write_data (objConnection, UTL_TCP.CRLF || '<BODY>');
UTL_SMTP.write_data (objConnection, UTL_TCP.CRLF || '</BODY>');
UTL_SMTP.write_data (objConnection, UTL_TCP.CRLF || '</HTML>');
UTL_SMTP.close_data (objConnection);
UTL_SMTP.quit (objConnection);