Email from Oracle database to any e-mail address....

Hi Guys,
I have been looking so many examples and material about sending e-mail from oracle database to any other e-mail address but couldn't find a clue.
Can someone tell me a simple way in Oracle9i database to send email messages on different e-mail addresses. Please with the help of code.
I just need to send a simple textual e-mail on 2 or more e-mail addresses. Thats all!
I want to do in database by creating a procedure or package just because i need to use this package on web also. I am using databse 9i release 1. Forms 6i for development and 9iAS to deploy my forms on web.
Please help, its really very urgent!
Imran Baig

For more about.. it check
http://asktom.oracle.com/pls/ask/f?p=4950:8:9516816346482415741::NO::F4950_P8_DISPLAYID,F4950_P8_CRITERIA:2118740358226
--Binny

Similar Messages

HTML Formated Email From Oracle Database

Hello,
I am generating email alerts from oracle 11g,10g using utl_mail.send.
I want to genrate/send email in HTML formated.
How i can send HTML formated email form Oracle Database (11g,10g)
Thanks In Advance

hi,
inside oracle apex 10g. i am using this.
please try
begin
HTMLDB_MAIL.SEND(
P_TO => '[email protected]',
P_FROM => '[email protected]',
P_BODY => 'test',
P_BODY_HTML => '<table><tr><td>data</td></tr></table>' || SYSDATE,
P_SUBJ => 'Test Email working '
wwv_flow_mail.push_queue(
P_SMTP_HOSTNAME => 'localhost',
P_SMTP_PORTNO => '25'
end;
Thanks
LOGA
www.go-websoft.com
Apex Consulting & Development

PHISHING EMAIL FROM MYSELF I.E. MY MAC MAIL ADDRESS-WHAT TO DO

I have been receiving a few spam emails lately to my mac account and noticed they all seem to originate from Russia which is not good. However today I received an email from my own address but with a precursor title then my email address and it list only my email as the return path. I've never gotten anything like this before. Have I been compromised???
thanks,
J

This happens to everybody. Some spambot found your email address on a list somewhere and inserted it it the "From:" field of a few million spam messages. This is called "spoofing" your address, and is a standard spammer practice. It doesn't indicate that anybody has gotten into your computer — only that your email address is out there in cyberspace. That's no surprise: everyone's is. Don't worry about it.

How to send an email from oracle?

Hi I want to send email from oracle database.
i have tried following procedure
create or replace
2 PROCEDURE send_mail (p_sender IN VARCHAR2,
3 p_recipient IN VARCHAR2,
4 p_message IN VARCHAR2)
5 as
6 l_mailhost VARCHAR2(255) := 'aria.us.oracle.com';
7 l_mail_conn utl_smtp.connection;
8 BEGIN
9 l_mail_conn := utl_smtp.open_connection(l_mailhost, 25);
10 utl_smtp.helo(l_mail_conn, l_mailhost);
11 utl_smtp.mail(l_mail_conn, p_sender);
12 utl_smtp.rcpt(l_mail_conn, p_recipient);
13 utl_smtp.open_data(l_mail_conn );
14 utl_smtp.write_data(l_mail_conn, p_message);
15 utl_smtp.close_data(l_mail_conn );
16 utl_smtp.quit(l_mail_conn);
17 end;
and when i execute the following
begin
send_mail( '[email protected]',
'[email protected]',
'Hello arun' );
end;
I get the following errors
ERROR at line 1:
ORA-29278: SMTP transient error: 421 Service not available
ORA-06512: at "SYS.UTL_SMTP", line 21
ORA-06512: at "SYS.UTL_SMTP", line 97
ORA-06512: at "SYS.UTL_SMTP", line 139
ORA-06512: at "TEST.SEND_MAIL", line 8
ORA-06512: at line 2
Please help
Regards
Arun

C:\>telnet aria.us.oracle.com 25Only if you work ofr Oracle & start behind their firewall would I expect this to work.
The SMTP server to which PL/SQL connects needs to be YOUR corporate email (MTA) server & configured to RELAY message.
Contact your LOCAL postmaster/Network Admin
NONE of this is related to Oracle RDBMS!

Automation of email from Oracle

Hi all,
Is there any simple Pl/SQL way of sending emails from ORACLE database.Please note that I am using ORACLE 8i Release 8.1.5(and not 8.1.6 where we have utl_smtp package).Actually I want to automate email generation from ORACLE DB so that emails are fired everyday evening depending on some daily changes in Database due to whole days transactions.
Please suggest any simple and efficient way to do this..
Thanx in Advance
anurag
null

<BLOCKQUOTE><font size="1" face="Verdana, Arial">quote:</font><HR>Originally posted by anuragj:
Hi all,
Is there any simple Pl/SQL way of sending emails from ORACLE database.Please note that I am using ORACLE 8i Release 8.1.5(and not 8.1.6 where we have utl_smtp package).Actually I want to automate email generation from ORACLE DB so that emails are fired everyday evening depending on some daily changes in Database due to whole days transactions.
Please suggest any simple and efficient way to do this..
Thanx in Advance
anurag <HR></BLOCKQUOTE>
Currently I am trying to do this via java. Having a few problems trying to implement the examples but you might try note: 120994.1 in Metalink. Or send an email to [email protected] and I will send you the full article.

How to mail pdf file from oracle database 11g

Hi,
Using following code to send pdf file from oracle database.
DECLARE
v_From VARCHAR2(80) := '[email protected]';
v_Recipient VARCHAR2(80) := '[email protected]';
v_Subject VARCHAR2(80) := 'test subject';
v_Mail_Host VARCHAR2(30) := '116.214.31.249';
v_Mail_Conn sys.utl_smtp.Connection;
crlf VARCHAR2(2) := chr(13)||chr(10);
BEGIN
v_Mail_Conn := sys.utl_smtp.Open_Connection(v_Mail_Host, 26);
sys.utl_smtp.Helo(v_Mail_Conn, v_Mail_Host);
sys.utl_smtp.Mail(v_Mail_Conn, v_From);
sys.utl_smtp.Rcpt(v_Mail_Conn, v_Recipient);
sys.utl_smtp.Data(v_Mail_Conn,
'Date: ' || to_char(sysdate, 'Dy, DD Mon YYYY hh24:mi:ss') || crlf ||
'From: ' || v_From || crlf ||
'Subject: '|| v_Subject || crlf ||
'To: ' || v_Recipient || crlf ||
'MIME-Version: 1.0'|| crlf ||     -- Use MIME mail standard
'Content-Type: multipart/mixed;'|| crlf ||
' boundary="-----SECBOUND"'|| crlf ||
crlf ||
'-------SECBOUND'|| crlf ||
'Content-Type: text/plain;'|| crlf ||
'Content-Transfer_Encoding: 7bit'|| crlf ||
crlf ||
'some message text'|| crlf ||     -- Message body
'more message text'|| crlf ||
crlf ||
'-------SECBOUND'|| crlf ||
'Content-Type: file;'|| crlf ||
' name="D:\mail\pdfSample.pdf"'|| crlf ||
'Content-Transfer_Encoding: 8bit'|| crlf ||
'Content-Disposition: attachment;'|| crlf ||
' filename="D:\mail\pdfSample.pdf"'|| crlf ||
crlf ||
'CSV,file,attachement'|| crlf ||     -- Content of attachment
crlf ||
'-------SECBOUND--'               -- End MIME mail
sys.utl_smtp.Quit(v_mail_conn);
EXCEPTION
WHEN sys.utl_smtp.Transient_Error OR sys.utl_smtp.Permanent_Error then
raise_application_error(-20000, 'Unable to send mail: '||sqlerrm);
END;
Above code executed successfully and mail is send to recipient but file is corrupted.
I think it doesn't pick file from specified location, attachment name is appearing like this 'D:mailpdfsample.pdf
Oracle Database : 11g R2
O.S : windows 7 Professional
Thanks in Advance

parapr wrote:
sys.utl_smtp.Helo(v_Mail_Conn, v_Mail_Host);The above violates RFC 5321 section 4.1.1.1
'-------SECBOUND'|| crlf ||
'Content-Type: file;'|| crlf ||
' name="D:\mail\pdfSample.pdf"'|| crlf ||
'Content-Transfer_Encoding: 8bit'|| crlf ||
'Content-Disposition: attachment;'|| crlf ||
' filename="D:\mail\pdfSample.pdf"'|| crlf ||Invalid Mime header above. Filename are logical. Not physical. Loose the drive and directory names. The filename is there to name the Mime body's content.
crlf ||
'CSV,file,attachement'|| crlf ||     -- Content of attachmentHow is the above PDF content? This is a string containing the text CSV,file,attachement. Which means when this is what is saved as a PDF file by the mail reader.
EXCEPTION
WHEN sys.utl_smtp.Transient_Error OR sys.utl_smtp.Permanent_Error then
raise_application_error(-20000, 'Unable to send mail: '||sqlerrm);
END;Silly. Why change meaningful exceptions into a generic meaningless exception?? That does not make any sense.

Sending a mail from oracle database

Hi,
I have a requirement to send a mail from oracle database.I use UTL_TCP package for this.Although my procedure is executed successfully,i dont get the mails in my inbox.Please help me to figure out a solution.
Thanks in advance....

Hi, you must use UTL_SMTP package for send emails, it has more performance and features for debug. You must look the next code, this is a example for send emails.
DECLARE
c UTL_SMTP.CONNECTION;
PROCEDURE send_header(name IN VARCHAR2, header IN VARCHAR2) AS
BEGIN
UTL_SMTP.WRITE_DATA(c, name || ': ' || header || UTL_TCP.CRLF);
END;
BEGIN
c := UTL_SMTP.OPEN_CONNECTION('smtp-server.acme.com');
UTL_SMTP.HELO(c, 'foo.com');
UTL_SMTP.MAIL(c, '[email protected]');
UTL_SMTP.RCPT(c, '[email protected]');
UTL_SMTP.OPEN_DATA(c);
send_header('From', '"Sender" <[email protected]>');
send_header('To', '"Recipient" <[email protected]>');
send_header('Subject', 'Hello');
UTL_SMTP.WRITE_DATA(c, UTL_TCP.CRLF || 'Hello, world!');
UTL_SMTP.CLOSE_DATA(c);
UTL_SMTP.QUIT(c);
EXCEPTION
WHEN utl_smtp.transient_error OR utl_smtp.permanent_error THEN
BEGIN
UTL_SMTP.QUIT(c);
EXCEPTION
WHEN UTL_SMTP.TRANSIENT_ERROR OR UTL_SMTP.PERMANENT_ERROR THEN
NULL; -- When the SMTP server is down or unavailable, we don't have
-- a connection to the server. The QUIT call will raise an
-- exception that we can ignore.
END;
raise_application_error(-20000,
'Failed to send mail due to the following error: ' || sqlerrm);
END;
Also review the next link for get more information about the UTL_SMTP packege.
http://download.oracle.com/docs/cd/B19306_01/appdev.102/b14258/u_smtp.htm#sthref15587
Regards.

Send mail from oracle database 10g

Hi ,
I need to send a test mail from oracle database 10g to my gmail account through a stored procedure .
I will pass the list of recipents , subject and text of the mail through parameters .
Can anyone give me the code of the storerd procedure please ,
Thank you .

hi, for example
DECLARE
mail_conn UTL_SMTP.connection;
smtp_relay VARCHAR2(32) := '172.16.x.x';
recipient_address VARCHAR2(64) := '[email protected]';
sender_address VARCHAR2(64) := '[email protected]';
mail_port NUMBER := 25;
msg VARCHAR2(200);
BEGIN
mail_conn := UTL_SMTP.open_connection(smtp_relay,mail_port);
UTL_SMTP.HELO(mail_conn, smtp_relay);
UTL_SMTP.MAIL(mail_conn, sender_address);
UTL_SMTP.RCPT(mail_conn, recipient_address);
UTL_SMTP.DATA(mail_conn, 'Payment request iniated');
UTL_SMTP.QUIT(mail_conn);
end;

How to send a mail automatically based on a date from ORACLE database

Hi,
I want to send a mail automatically based on a date from ORACLE database.
Please help me.
thanks
--Sara

programs are available on net to send mail directly from oracle ie procedure s in oracle sending mails

Read email from oracle

With help from forum and TAR I am now using java to send emails from Oracle 8.1.7
Now is there a way for Oracle to read emails.
Ready to upgrage to 9i or 10g if necessary.
James.

URGENT PLZ: IS THERE ANY WAY TO RECIEVE MAIL IN ORACLE DATABASE???

Send email from oracle

Dear member & developers
I want to send e mail from oracle application. If anybody knows, how to do this. please write or send a sample application or forms or database sql. I don't restricted to any application version like 10g or 11g same as database...
I seriously need it.
Thanks in Advanced.

As Francois indicated - there are multiple examples around the internet and in the forums. Any email solution you choose is going to require that you have access to a valid email server (SMTP, POP3, etc). Also, the solution is dependent on "Where" you want to send the email from. I prefer a database solution because this makes it available to your entire database application, but you can use a Java email method (using Forms PJC or Java Bean) or you can OLE link to Microsoft Outlook.
Take a look at Send Email from the Database. I wrote this package based on the DEMO_MAIL package provided by Oracle (via OTN) and stream line things a bit. There is an example of how to use the package in the article.
Take a look at Send email with HTML body and local file attachements article on Franscois's web site for an example of sending email from an Oracle Form using Java.
If you need to use Outlook - search the forum. I don't consider this to be a reasonable method so I don't use it or recommend it. I'm sure it works fine for others, I just think being dependent on a application installed on the client is not a solid solution. That's just my opinion. ;-)
I search through out the net. Didn't get any tutorial video or any working materiel. I disagree with this statement - I did a quick Google search and found many examples (no videos) and demo's.
Hope this helps,
Craig B-)
If someone's response is helpful or correct, please mark it accordingly.

REP-0159 when run_product from oracle database

Hi,
I can`t open report from oracle database. I have this products (Windows NT 4):
Oracle8i Enterprise Edition Release
8.1.7.0.0 - Production
With the Partitioning option
JServer Release 8.1.7.0.0 - Production
Report Builder 6.0.8.8.3
ORACLE Server Release 8.0.6.0.0
Forms [32 Bit] Version 6.0.8.8.0
(Production)
This is the code in the forms:
____DECLARE
____ vs_program_name VARCHAR2(30);
____ pl_id PARAMLIST;
____ pl_name VARCHAR2(60);
____BEGIN
____ pl_name := 'Unloading';
____ pl_id := GET_PARAMETER_LIST(pl_name);
____ IF NOT ID_NULL(pl_id) THEN
____ DESTROY_PARAMETER_LIST(pl_id);
____ END IF;
____ pl_id := CREATE_PARAMETER_LIST(pl_name);
____ IF ID_NULL(pl_id) THEN
____ Message('Error ...!');
____ ELSE
____ vs_program_name := 'victor';
____ ADD_PARAMETER
____ (pl_id, 'pv_admission_nbr',
____ TEXT_PARAMETER, 'hola');
____ Run_Product(REPORTS, vs_program_name, ____ SYNCHRONOUS, RUNTIME, DB, pl_id);
____ END IF;
____end;
This is the error message in server report:
REP-0159: Syntax error on command line.
I need help, any idea?

<BLOCKQUOTE><font size="1" face="Verdana, Arial">quote:</font><HR>Originally posted by Randall Roberts ([email protected]):
If the Reports runtime process actually has been launched, there will be a button for it on your taskbar. Click the button and a little empty window opens. But from the menu bar in the window you can select an option that shows the actual error generated by reports runtime.<HR></BLOCKQUOTE>
Thanks!
This is the error message:
Error submitting report [Sun May 20 20:12:59 2001] ...
REP-0159: Syntax error on command line.
and this is the form code:
DECLARE
vs_program_name VARCHAR2(30);
pl_id PARAMLIST;
pl_name VARCHAR2(60);
BEGIN
pl_name := 'Unloading';
pl_id := GET_PARAMETER_LIST(pl_name);
IF NOT ID_NULL(pl_id) THEN
DESTROY_PARAMETER_LIST(pl_id);
END IF;
pl_id := CREATE_PARAMETER_LIST(pl_name);
IF ID_NULL(pl_id) THEN
Message('Error to create parameters list, please call support...!');
ELSE
vs_program_name := 'victor';
ADD_PARAMETER(pl_id, 'pv_admission_nbr', TEXT_PARAMETER, 'hola');
Run_Product(REPORTS, vs_program_name, SYNCHRONOUS, RUNTIME, DB, pl_id,null);
END IF;
end;
Can you help me?
null

Sending Unicode HTML email from Oracle

Dear All,
How we can send the HTML email from Oracle in Unicode format (I am using Arabic Language, to be specific). So far I have tried the following solutions (using utl_smpt) without any success (either i see junk characters in the email or see question marks). Would you please help me in solving this?
Options Tried*
Option 1
SQL> ed
Wrote file afiedt.buf
1 CREATE OR REPLACE PROCEDURE p_send_mail_test (
2 sender IN VARCHAR2,
3 recipient IN VARCHAR2,
4 subj IN VARCHAR2,
5 message IN VARCHAR2)
6 IS
7 mailhost VARCHAR2(30) := '<smtp Server>';
8 c utl_smtp.connection;
9 PROCEDURE send_header( name IN VARCHAR2, header IN VARCHAR2) AS
10 BEGIN
11 utl_smtp.write_data(c, name || ': ' || header || utl_tcp.CRLF);
12 END;
13 BEGIN
14 c := utl_smtp.open_connection(mailhost,25);
15 utl_smtp.helo(c, mailhost);
16 utl_smtp.mail(c, sender);
17 utl_smtp.rcpt(c, recipient);
18 utl_smtp.open_data(c);
19 send_header('From', sender);
20 send_header('To', recipient);
21 -- If you need to send mail to more than one receipient, uncomment the
22 -- following line(s) as appropriate. Please don't forget the ","
23 -- in the "To" line before the next receipient's email id. You can't
24 -- use a comma separated list in the receipient parameter.
25 -- For variable number of "To"'s and "Cc"'s have multiple calls to
26 -- "send_header" function inside a cursor for loop.
27 -- Similar comments apply for "Cc" too.
28 -- send_header('To', ',<email@domain>');
29   send_header('Cc', ',<email@domain>');
30 send_header('Subject', subj);
31 utl_smtp.write_data(c, utl_tcp.CRLF || message);
32 utl_smtp.close_data(c);
33 utl_smtp.quit(c);
34 EXCEPTION
35 WHEN utl_smtp.transient_error OR utl_smtp.permanent_error THEN
36 utl_smtp.quit(c);
37 raise_application_error(-20000,
38 'Failed to send mail due to the following error: ' || sqlerrm);
39* END;
SQL>
SQL> /
Procedure created.
SQL> ed
Wrote file afiedt.buf
1 declare
2   email_text varchar2(2000);
3   contract_end_date_v date := sysdate;
4   name_v varchar2(200) := 'Riaz';
5   begin
6    email_text :='<br/><div align="right"><font size="4"><b>السيد '||name_v||' المحترم</b><br/><br/> يرجى التكرم بالعلم أن العقد الخاص بكم سينتهي بتاريخ ' || to_char(contract_end_date_v,'dd-mm-yyyy')||'<br/>. وعليه يرجـى التكـرم بإفادة إدارة الموارد البشرية في حال عدم رغبتكم بتجديد العقد خلال مدة أقصها أسبوعين من اليوم وذلك للأهمية القصوى <br/>.ولكم جزيل الشكر والتقدير </font></div>';
7    p_send_mail_test('<email@domain>','<email@domain>','Hello',email_text);
8* end;
SQL> /
PL/SQL procedure successfully completed.
Result_
<div align="right"><font size="4"><b>????? Riaz ???????</b>
???? ?????? ?????? ?? ????? ????? ??? ?????? ?????? 12-07-2011
.???? ???? ????? ???????? </font></div>
[Question marks along with all tags; this OTN page is converting that to HTML output]
Option2
SQL> ed
Wrote file afiedt.buf
1 create or replace procedure html_email(
2      p_to            in varchar2,
3      p_from          in varchar2,
4      p_subject       in varchar2,
5      p_text          in varchar2 default null,
6      p_html          in varchar2 default null
7 )
8 is
9      l_boundary      varchar2(255) default 'a1b2c3d4e3f2g1';
10      l_connection    utl_smtp.connection;
11      l_body_html     clob := empty_clob; --This LOB will be the email message
12      l_offset        number;
13      l_ammount       number;
14      l_temp          varchar2(32767) default null;
15      l_smtp_hostname varchar2(50) := '<smtp Server>';
16 begin
17      l_connection := utl_smtp.open_connection( l_smtp_hostname, 25);
18      utl_smtp.helo( l_connection, l_smtp_hostname );
19      utl_smtp.mail( l_connection, p_from );
20      utl_smtp.rcpt( l_connection, p_to );
21      l_temp := l_temp || 'MIME-Version: 1.0' || chr(13) || chr(10);
22      l_temp := l_temp || 'To: ' || p_to || chr(13) || chr(10);
23      l_temp := l_temp || 'From: ' || p_from || chr(13) || chr(10);
24      l_temp := l_temp || 'Subject: ' || p_subject || chr(13) || chr(10);
25      l_temp := l_temp || 'Reply-To: ' || p_from || chr(13) || chr(10);
26      l_temp := l_temp || 'Content-Type: multipart/alternative; boundary=' ||
27                           chr(34) || l_boundary || chr(34) || chr(13) ||
28                           chr(10);
29      ----------------------------------------------------
30      -- Write the headers
31      dbms_lob.createtemporary( l_body_html, false, 10 );
32      dbms_lob.write(l_body_html,length(l_temp),1,l_temp);
33      ----------------------------------------------------
34      -- Write the text boundary
35      l_offset := dbms_lob.getlength(l_body_html) + 1;
36      l_temp   := '--' || l_boundary || chr(13)||chr(10);
37      l_temp   := l_temp || 'content-type: text/plain;charset=utf-8' ||
38                    chr(13) || chr(10) || chr(13) || chr(10);
39      dbms_lob.write(l_body_html,length(l_temp),l_offset,l_temp);
40      ----------------------------------------------------
41      -- Write the plain text portion of the email
42      l_offset := dbms_lob.getlength(l_body_html) + 1;
43      dbms_lob.write(l_body_html,length(p_text),l_offset,p_text);
44      ----------------------------------------------------
45      -- Write the HTML boundary
46      l_temp   := chr(13)||chr(10)||chr(13)||chr(10)||'--' || l_boundary ||
47                      chr(13) || chr(10);
48      l_temp   := l_temp || 'content-type: text/html;charset=utf-8' ||
49                     chr(13) || chr(10) || chr(13) || chr(10);
50      l_offset := dbms_lob.getlength(l_body_html) + 1;
51      dbms_lob.write(l_body_html,length(l_temp),l_offset,l_temp);
52      ----------------------------------------------------
53      -- Write the HTML portion of the message
54      l_offset := dbms_lob.getlength(l_body_html) + 1;
55      dbms_lob.write(l_body_html,length(p_html),l_offset,p_html);
56      ----------------------------------------------------
57      -- Write the final html boundary
58      l_temp   := chr(13) || chr(10) || '--' || l_boundary || '--' || chr(13);
59      l_offset := dbms_lob.getlength(l_body_html) + 1;
60      dbms_lob.write(l_body_html,length(l_temp),l_offset,l_temp);
61      ----------------------------------------------------
62      -- Send the email in 1900 byte chunks to UTL_SMTP
63      l_offset := 1;
64      l_ammount := 1900;
65      utl_smtp.open_data(l_connection);
66      while l_offset < dbms_lob.getlength(l_body_html) loop
67          utl_smtp.write_data(l_connection,
68                              dbms_lob.substr(l_body_html,l_ammount,l_offset));
69          l_offset := l_offset + l_ammount ;
70          l_ammount := least(1900,dbms_lob.getlength(l_body_html) - l_ammount);
71      end loop;
72      utl_smtp.close_data(l_connection);
73      utl_smtp.quit( l_connection );
74      dbms_lob.freetemporary(l_body_html);
75* end;
SQL> /
Procedure created.
SQL> ed
Wrote file afiedt.buf
1 declare
2   email_text varchar2(2000);
3   contract_end_date_v date := sysdate;
4   name_v varchar2(200) := 'Riaz';
5   begin
6    email_text :='<br/><div align="right"><font size="4"><b>السيد '||name_v||' المحترم</b><br/><br/> يرجى التكرم بالعلم أن العقد الخاص بكم سينتهي بتاريخ ' || to_char(contract_end_date_v,'dd-mm-yyyy')||'<br/>. وعليه يرجـى التكـرم بإفادة إدارة الموارد البشرية في حال عدم رغبتكم بتجديد العقد خلال مدة أقصها أسبوعين من اليوم وذلك للأهمية القصوى <br/>.ولكم جزيل الشكر والتقدير </font></div>';
7    html_email(p_to=>'<email@domain>',p_from=>'<email@domain>',p_subject=>'Hello',p_text=>'Hi', p_html=>email_text);
8* end;
SQL> /
PL/SQL procedure successfully completed.
Result*
????? Riaz ???????
???? ?????? ?????? ?? ????? ????? ??? ?????? ?????? 12-07-2011
Option3
SQL> ed
Wrote file afiedt.buf
1 create or replace procedure p_html_email_riaz(
2      p_to            in varchar2,
3      p_from          in varchar2,
4      p_subject       in varchar2,
5      p_text          in varchar2 default null,
6      p_html          in varchar2 default null
7 )
8 is
9      l_boundary      varchar2(255) default 'a1b2c3d4e3f2g1';
10      l_connection    utl_smtp.connection;
11      l_body_html     clob := empty_clob; --This LOB will be the email message
12      l_offset        number;
13      l_ammount       number;
14      l_temp          varchar2(32767) default null;
15      l_smtp_hostname varchar2(50) := '<smtp Server>';
16 begin
17      l_connection := utl_smtp.open_connection( l_smtp_hostname, 25);
18      utl_smtp.helo( l_connection, l_smtp_hostname );
19      utl_smtp.mail( l_connection, p_from );
20      utl_smtp.rcpt( l_connection, p_to );
21      l_temp := l_temp || 'MIME-Version: 1.0' || chr(13) || chr(10);
22      l_temp := l_temp || 'To: ' || p_to || chr(13) || chr(10);
23      l_temp := l_temp || 'From: ' || p_from || chr(13) || chr(10);
24      l_temp := l_temp || 'Subject: ' || p_subject || chr(13) || chr(10);
25      l_temp := l_temp || 'Reply-To: ' || p_from || chr(13) || chr(10);
26      l_temp := l_temp || 'Content-Type: multipart/alternative; boundary=' ||
27                           chr(34) || l_boundary || chr(34) || chr(13) ||
28                           chr(10);
29      ----------------------------------------------------
30      -- Write the headers
31      dbms_lob.createtemporary( l_body_html, false, 10 );
32      dbms_lob.write(l_body_html,length(l_temp),1,l_temp);
33      ----------------------------------------------------
34      -- Write the text boundary
35      l_offset := dbms_lob.getlength(l_body_html) + 1;
36      l_temp   := '--' || l_boundary || chr(13)||chr(10);
37      l_temp   := l_temp || 'content-type: text/plain; charset=UTF-8' ||
38                    chr(13) || chr(10) || chr(13) || chr(10);
39      dbms_lob.write(l_body_html,length(l_temp),l_offset,l_temp);
40      ----------------------------------------------------
41      -- Write the plain text portion of the email
42 /**
43      l_offset := dbms_lob.getlength(l_body_html) + 1;
44      dbms_lob.write(l_body_html,length(p_text),l_offset,p_text);
45 **/
46      ----------------------------------------------------
47      -- Write the HTML boundary
48      l_temp   := chr(13)||chr(10)||chr(13)||chr(10)||'--' || l_boundary ||
49                      chr(13) || chr(10);
50      l_temp   := l_temp || 'content-type: text/html;' ||
51                     chr(13) || chr(10) || chr(13) || chr(10);
52      l_offset := dbms_lob.getlength(l_body_html) + 1;
53      dbms_lob.write(l_body_html,length(l_temp),l_offset,l_temp);
54      ----------------------------------------------------
55      -- Write the HTML portion of the message
56      l_offset := dbms_lob.getlength(l_body_html) + 1;
57      dbms_lob.write(l_body_html,length(p_html),l_offset,p_html);
58      ----------------------------------------------------
59      -- Write the final html boundary
60      l_temp   := chr(13) || chr(10) || '--' || l_boundary || '--' || chr(13);
61      l_offset := dbms_lob.getlength(l_body_html) + 1;
62      dbms_lob.write(l_body_html,length(l_temp),l_offset,l_temp);
63      ----------------------------------------------------
64      -- Send the email in 1900 byte chunks to UTL_SMTP
65      l_offset := 1;
66      l_ammount := 1900;
67      utl_smtp.open_data(l_connection);
68      while l_offset < dbms_lob.getlength(l_body_html) loop
69          utl_smtp.write_raw_data(l_connection,
70              utl_raw.cast_to_raw(
71                  dbms_lob.substr(l_body_html,l_ammount,l_offset ) ) );
72          l_offset := l_offset + l_ammount ;
73          l_ammount := least(1900,dbms_lob.getlength(l_body_html) - l_ammount);
74      end loop;
75      utl_smtp.close_data(l_connection);
76      utl_smtp.quit( l_connection );
77      dbms_lob.freetemporary(l_body_html);
78* end;
SQL>
SQL> /
Procedure created.
SQL> ed
Wrote file afiedt.buf
1 declare
2   email_text varchar2(2000);
3   contract_end_date_v date := sysdate;
4   name_v varchar2(200) := 'Riaz';
5   begin
6    email_text :='<br/><div align="right"><font size="4"><b>السيد '||name_v||' المحترم</b><br/><br/> يرجى التكرم بالعلم أن العقد الخاص بكم سينتهي بتاريخ ' || to_char(contract_end_date_v,'dd-mm-yyyy')||'<br/>. وعليه يرجـى التكـرم بإفادة إدارة الموارد البشرية في حال عدم رغبتكم بتجديد العقد خلال مدة أقصها أسبوعين من اليوم وذلك للأهمية القصوى <br/>.ولكم جزيل الشكر والتقدير </font></div>';
7    p_html_email_riaz(p_to=>'<email@domain>',p_from=>'<email@domain>',p_subject=>'Hello',p_text=>'Hi', p_html=>email_text);
8* end;
SQL> /
PL/SQL procedure successfully completed.
Result*
GaSmO Riaz GacMJQc
mQLl GaJ_Qc HGaZac Cd GaZ^O GaNGU H_c SmdJem HJGQmN 12-07-2011
. fZame mQL\l GaJ_\Qc HE]GOI EOGQI GacfGQO GaHTQmI ]m MGa ZOc Q[HJ_c HJLOmO GaZ^O NaGa cOI C^UeG CSHfZmd cd Gamfc fPa_ aaCecmI Ga^Ufl
.fa_c LRma GaT_Q fGaJ^OmQ
*Option4*
[code]
SQL> ed
Wrote file afiedt.buf
1 CREATE OR REPLACE PROCEDURE send_email_html_test(
2 pi_from IN Varchar,
3 pi_to IN VARCHAR,
4 pi_cc IN Varchar,
5 pi_subj IN VARCHAR,
6 pi_msg CLOB
7 )
8 IS
9 conn utl_smtp.connection;
10 lv_mailhost varchar2(1000);
11 lv_port number;
12 BEGIN
13 lv_mailhost := '<smtp Server>';
14 lv_port := 25;
15 conn := utl_smtp.open_connection(lv_mailhost, lv_port);
16 utl_smtp.helo(conn, lv_mailhost);
17 utl_smtp.mail(conn, pi_from);
18 utl_smtp.rcpt(conn, pi_to);
19 IF pi_cc is not null THEN
20 utl_smtp.rcpt(conn, pi_cc);
21 END IF;
22 utl_smtp.open_data(conn);
23 utl_smtp.write_data(conn, 'MIME-version: 1.0' || utl_tcp.CRLF);
24 utl_smtp.write_data(conn, 'Content-Type: text/html; charset=iso-8859-6' ||
25 utl_tcp.CRLF);
26 utl_smtp.write_data(conn, 'Content-Transfer-Encoding: 8bit' ||
27 utl_tcp.CRLF);
28 utl_smtp.write_data(conn, 'From:' ||pi_from || utl_tcp.CRLF);
29 utl_smtp.write_data(conn, 'To:' ||pi_to || utl_tcp.CRLF);
30 utl_smtp.write_data(conn, 'Cc:' ||pi_cc || utl_tcp.CRLF);
31 utl_smtp.write_data(conn, 'Reply-To:' ||pi_from || utl_tcp.CRLF);
32 utl_smtp.write_data(conn, 'Subject:' ||pi_subj|| utl_tcp.CRLF);
33 utl_smtp.write_data(conn, utl_tcp.crlf);
34 utl_smtp.write_raw_data(conn, utl_raw.cast_to_raw(pi_msg));
35 utl_smtp.close_data(conn);
36 utl_smtp.quit(conn);
37 EXCEPTION WHEN others THEN
38 dbms_output.put_line(sqlerrm);
39* END;
40 /
Procedure created.
SQL> ed
Wrote file afiedt.buf
1 declare
2 email_text varchar2(2000);
3 contract_end_date_v date := sysdate;
4 name_v varchar2(200) := 'Riaz';
5 begin
6 email_text :='
<div align="right"><font size="4"><b>السيد '||name_v||' المحترم</b>
يرجى التكرم بالعلم أن العقد الخاص بكم سينتهي بتاريخ ' || to_char(contract_end_date_v,'dd-mm-yyyy')||'
. وعليه يرجـى التكـرم بإفادة إدارة الموارد البشرية في حال عدم رغبتكم بتجديد العقد خلال مدة أقصها أسبوعين من اليوم وذلك للأهمية القصوى
.ولكم جزيل الشكر والتقدير </font></div>';
7 send_email_html_test('<email@domain>',
8           '<email@domain>',
9 '<email@domain>',
10 'Hello',email_text);
11* end;
SQL> /
PL/SQL procedure successfully completed.
Result*
Riaz افكحترك
ٍرجٌ افترك بافغفك أل افغد افخاص بك سٍلتمٍ بتارٍخ 12-07-2011
. نغفٍم ٍرجٌ افترك بإادة إدارة افكنارد افبشرٍة ٍ حاف غدك ربتك بتجدٍد افغد خفاف كدة أصما أسبنغٍل كل افٍنك نذف ففأمكٍة افصنٌ
.نفك جزٍف افشر نافتدٍر
Option5
SQL> ed
Wrote file afiedt.buf
1 CREATE OR REPLACE PROCEDURE send_mail_test1 (p_to        IN VARCHAR2,
2                                         p_from      IN VARCHAR2,
3                                         p_subject   IN VARCHAR2,
4                                         p_text_msg IN VARCHAR2 DEFAULT NULL,
5                                         p_html_msg IN VARCHAR2 DEFAULT NULL,
6                                         p_smtp_host IN VARCHAR2,
7                                         p_smtp_port IN NUMBER DEFAULT 25)
8 AS
9    l_mail_conn   UTL_SMTP.connection;
10    l_boundary    VARCHAR2(50) := '----=*#abc1234321cba#*=';
11 BEGIN
12    l_mail_conn := UTL_SMTP.open_connection(p_smtp_host, p_smtp_port);
13    UTL_SMTP.helo(l_mail_conn, p_smtp_host);
14    UTL_SMTP.mail(l_mail_conn, p_from);
15    UTL_SMTP.rcpt(l_mail_conn, p_to);
16    UTL_SMTP.open_data(l_mail_conn);
17    UTL_SMTP.write_data(l_mail_conn, 'Date: ' || TO_CHAR(SYSDATE, 'DD-MON-YYYY HH24:MI:SS') || UTL_TCP.crlf);
18    UTL_SMTP.write_data(l_mail_conn, 'To: ' || p_to || UTL_TCP.crlf);
19    UTL_SMTP.write_data(l_mail_conn, 'From: ' || p_from || UTL_TCP.crlf);
20    UTL_SMTP.write_data(l_mail_conn, 'Subject: ' || p_subject || UTL_TCP.crlf);
21    UTL_SMTP.write_data(l_mail_conn, 'Reply-To: ' || p_from || UTL_TCP.crlf);
22    UTL_SMTP.write_data(l_mail_conn, 'MIME-Version: 1.0' || UTL_TCP.crlf);
23    UTL_SMTP.write_data(l_mail_conn, 'Content-Type: multipart/alternative; boundary="' || l_boundary || '"' || UTL_TCP.crlf || UTL_TCP.crlf);
24    IF p_text_msg IS NOT NULL THEN
25      UTL_SMTP.write_data(l_mail_conn, '--' || l_boundary || UTL_TCP.crlf);
26      UTL_SMTP.write_data(l_mail_conn, 'Content-Type: text/plain; charset="utf-8"' || UTL_TCP.crlf || UTL_TCP.crlf);
27      UTL_SMTP.write_data(l_mail_conn, p_text_msg);
28      UTL_SMTP.write_data(l_mail_conn, UTL_TCP.crlf || UTL_TCP.crlf);
29    END IF;
30    IF p_html_msg IS NOT NULL THEN
31      UTL_SMTP.write_data(l_mail_conn, '--' || l_boundary || UTL_TCP.crlf);
32      UTL_SMTP.write_data(l_mail_conn, 'Content-Type: text/html; charset="utf-8"' || UTL_TCP.crlf || UTL_TCP.crlf);
33      UTL_SMTP.write_data(l_mail_conn, p_html_msg);
34      UTL_SMTP.write_data(l_mail_conn, UTL_TCP.crlf || UTL_TCP.crlf);
35    END IF;
36    UTL_SMTP.write_data(l_mail_conn, '--' || l_boundary || '--' || UTL_TCP.crlf);
37    UTL_SMTP.close_data(l_mail_conn);
38    UTL_SMTP.quit(l_mail_conn);
39* END;
SQL> /
Procedure created.
SQL> ed
Wrote file afiedt.buf
1 declare
2   email_text varchar2(2000);
3   contract_end_date_v date := sysdate;
4   name_v varchar2(200) := 'Riaz';
5   begin
6    email_text :='<br/><div align="right"><font size="4"><b>السيد '||name_v||' المحترم</b><br/><br/> يرجى التكرم بالعلم أن العقد الخاص بكم سينتهي بتاريخ ' || to_char(contract_end_date_v,'dd-mm-yyyy')||'<br/>. وعليه يرجـى التكـرم بإفادة إدارة الموارد البشرية في حال عدم رغبتكم بتجديد العقد خلال مدة أقصها أسبوعين من اليوم وذلك للأهمية القصوى <br/>.ولكم جزيل الشكر والتقدير </font></div>';
7    send_mail_test1('<email@domain>',
8                  '<email@domain>',
9                         'Hello',
10                'msg',
11                email_text,
12                '<smtp Server>',
13                25);
14* end;
SQL> /
PL/SQL procedure successfully completed.
Result*
????? Riaz ???????
???? ?????? ?????? ?? ????? ????? ??? ?????? ?????? 12-07-2011
.???? ???? ????? ????????

I worked with Oracle support and was able to find solution. The helping document ids were: 752309.1 & 404389.1

ACL error when sending email from Oracle 11g

Hi,
It returned something like "error...ACL security" when I tried to send email from Oracle 11g. Is there any security thing that I need to release in Oracle 11g? I used to send emails from Oracle 10g and didn't find any problem.
Thanks.
Andy

In Database 11g Oracle introduced Network Access Control Lists (ACLs) to protect the database from users using the many internet-capable packages such as UTL_INADDR, UTL_HTTP, UTL_TCP, etc.
Read all about it in the docs and look at the code demos here:
http://www.morganslibrary.org/library.html
under DBMS_NETWORK_ACL_...

Sending email from Oracle through Lotus Domino Server

Hi,
I would like to know whether it is possible to send an email from Oracle through a Lotus Domino Server(acting as mail server). If yes, please provide me with the details.
Thanks in advance

Have a look at the database UTL_SMTP package

Email from Oracle database to any e-mail address....

Similar Messages

Maybe you are looking for