sai.hanuman 0 Newbie Poster

HI here is the code which gets the error message
"ERROR OCOURED-29279->ORA-29279: SMTP permanent error: 500 Access Denied By Port Acces"
please do help me in this regards

thanks in advance

CREATE OR REPLACE PROCEDURE s_test
AS
l_name VARCHAR2 (1000) := '';
conn UTL_SMTP.connection;
send_from VARCHAR2 (1000) := 'aldrin.vas@hotmail.com';
send_to VARCHAR2 (1000) := 'suresh.g@gmail.com';
BEGIN
FOR x IN (SELECT file_name filename,
MAX (source_file_date) last_loaded_date
FROM audit
GROUP BY file_name
HAVING MAX (source_file_date) < TRUNC (SYSDATE) - 1)
LOOP
l_name := x.filename;
conn :=
str.stars_mail.begin_mail (sender => send_from,
recipients => send_to,
subject => 'RDP Audit',
mime_type => 'TEXT/HTML'
);
str.stars_mail.write_text (conn => conn, MESSAGE => l_name);
str.stars_mail.end_mail (conn => conn);
DBMS_OUTPUT.put_line ('Mail sent');
END LOOP;
EXCEPTION
WHEN OTHERS
THEN
DBMS_OUTPUT.put_line ('ERROR OCOURED' || SQLCODE || '->' || SQLERRM);
END;
/