How to send mail attachment

Question

Hi,
I want to send email along with attachment. I have tried to install UTL_MAIL packages but dont have its backage body script i.e. %ORACLE_HOME%/RDBMS/ADMIN/PRVTMAIL.SQL file.
Please help me to guide installation of this package or tell me is there any alternate way.
Thanks
Usman Rana
mail the file at [email protected]

Answer 1

Hello
Sending email attachment from oracle I have no idea but you can do that from UNIX.
a) using MUTT a third party utility on unix will allow attachments in emails.
b) check the below mentioned script.
SUBJECT="Send mail from Unix with file attachments"
TO=junk\@testing.com
SPOOLFILE=/export/home/oracle/sqlplus.txt
echo "Produce listing from SQL*Plus..."
sqlplus -s sri/sri >$SPOOLFILE <<-EOF
set echo off feed off veri off pages 0 head off
select * from tab;
EOF
# echo "Convert file to DOS mode..."
# unix2dos $SPOOLFILE $SPOOLFILE 2>/dev/null
echo "Send the E-mail message..."
/usr/bin/mailx -s "${SUBJECT}" ${TO} <<-EOF
Hi,
This sample E-mail message demonstrates how one can attach
files when sending messages with the Unix mailx utility.
First attachment: SQL*Plus spool file
~< ! uuencode $SPOOLFILE `basename $SPOOLFILE`
Second attachment: mailx.ksh (this script)
~< ! uuencode mailx.ksh mailx.txt
Third attachment: /etc/passwd file
~< ! uuencode /etc/passwd passwords
Best regards
~.
EOF
echo "Done!"
c) Third option is creating a procedure in oracle which allows you to send emails but with no attachments.
/* Sending email from oracle database */
create or replace procedure send_mail
( sender      in varchar2,
recipient in varchar2,
subject      in varchar2,
message      in varchar2 ) is
mailhost varchar2(30) := '192.168.1.100';
chlr varchar2(2) := chr(13) || chr(10);
mail_conn utl_smtp.connection;
mesg varchar2(4000);
begin
mail_conn := utl_smtp.open_connection(mailhost, 25);
mesg:= 'date: ' || to_char( sysdate, 'dd-mon-yyyy hh24:mi:ss' )||chlr||
'from: <'||sender||'>' || chlr ||
'subject: '||subject || chlr ||
'to: '||recipient || chlr ||
'tablespace report - rpt '|| chlr || message;
utl_smtp.helo(mail_conn, mailhost);
utl_smtp.mail(mail_conn, sender);
utl_smtp.rcpt(mail_conn, recipient);
utl_smtp.data(mail_conn, mesg);
utl_smtp.quit(mail_conn);
exception
     when others then
     raise_application_error(-20002,'unable to send the mail.'||sqlerrm);
end;
Hope this helps
-Sri