UTL_SMTP

CREATE OR REPLACE PROCEDURE send_email
IS
mailhost varchar2 (30) := 'smtp.erpschools.com';
crlf varchar2(2)Â := CHR (13) || CHR (10);
v_email varchar2(16000);
message_1 LONG;
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@erpschools.com');
utl_smtp.rcpt (mail_conn, 'receiver@erpschools.com');
message_1 := 'From: Mr Sender < sender@erpschools.com >' || crlf ||
'Subject: Testing Hyperlink' || crlf ||
'To: Mrs Receiver ' || crlf ||
'' || crlf || crlf ;
utl_smtp.data(mail_conn, 'MIME-Version: 1.0' ||CHR(13)||CHR(10)||'Content-type: text/html' || CHR(13)||CHR(10)||message_1);
utl_smtp.quit (mail_conn);
END;