您好我有以下html片段,我想通过电子邮件发送我的程序。 如何将它放在UTL_MAIL的message属性中。 我应该把它放在一些变量中,如果是这样的话?
如果有更好的方法,我也很想探索它。我有两个选项。我无法使MESSAGE属性有效。
OPTION 1
DECLARE
BEGIN
UTL_MAIL.SEND (
sender => 'xxx@yyy',
recipients => 'abc@xyz',
subject => 'Hi',
MESSAGE =>
OWA_UTIL.cellsprint (p_theQuery =>'SELECT a1,b1,c1,d1
FROM test1
WHERE a1 > 1
ORDER BY a1',
p_max_rows=>'10',p_format_numbers => NULL),
mime_type => 'text/html; charset=us-ascii');
END;
----------------------------------------------------------------
OPTION2
Declare
Begin
....
......
UTL_MAIL.SEND (
sender => 'xxx@yyy',
recipients => 'abc@xyz',
subject => 'Hi',
MESSAGE => ***
mime_type => 'text/html; charset=us-ascii');
***
HTP.P ('<HTML>');
HTP.P ('<HEAD>');
HTP.P ('<TITLE>Duplicate Records</TITLE>');
HTP.P ('</HEAD>');
HTP.P ('<BODY>');
HTP.P ('<H1>Duplicate Records</H1>');
HTP.P ('<TABLE BORDER="1 ">');
HTP.P ('<TR><TH>HIERARCHY</TH><TH>Org Long NAME</TH></TR>');
FOR idx IN (SELECT a1,b1,c1,d1
FROM test1
WHERE a1 > 1
ORDER BY a1 LOOP
HTP.P ('<TR>');
HTP.P ('<TD>' || idx.a1 || '</TD>');
HTP.P ('<TD>' || idx.b1 || '</TD>');
HTP.P ('<TD>' || idx.c1 || '</TD>');
HTP.P ('<TD>' || idx.d1 || '</TD>');
HTP.P ('</TR>');
END LOOP;
HTP.P ('</TABLE>');
HTP.P ('</BODY>');
HTP.P ('</HTML>');
END;
答案 0 :(得分:2)
UTL_MAIL.send的message
只是一个VARCHAR2参数,它以字符串作为参数。
HTP.P
和OWA_UTIL.cellsprint
是过程,而不是函数,因此它们不能用于将值传递给邮件。它们设计用于基于Web的应用程序,不适用于其他目的,如邮件。
如果您愿意,可以使用HTF
中的功能,但在您的情况下,您已经编写了html,所以您也可以直接将其传递给消息:
UTL_MAIL.SEND (
sender => 'xxx@yyy',
recipients => 'abc@xyz',
subject => 'Hi',
MESSAGE => '<HTML>...'
mime_type => 'text/html; charset=us-ascii');