這次是 Send Mail on Oracle PL/SQL - 最終 Final 版
Send Mail 第一期 :
點選此處.
Send Mail 第二期 :
點選此處.
Send Mail 第三期 :
點選此處.
集合前三期, 這次不再講如何撰寫程式碼,
而是直接說明有哪些功能可用, 如下 :
1) 最基本功能
DECLARE
V_MESSAGE VARCHAR2(1000);
BEGIN
v_message := 'Hello 歡迎光臨';
XXFND_MAIL.SEND ( 'tomkuo139@yahoo.com.tw'
, ''
, ''
, 'Send 中文 Mail on PL/SQL'
, V_MESSAGE
);
END;
DECLARE
V_MESSAGE VARCHAR2(1000);
BEGIN
v_message := 'Hello 歡迎光臨';
XXFND_MAIL.SEND ( 'abc <tomkuo139@yahoo.com.tw>'
, ''
, ''
, 'Send 中文 Mail on PL/SQL'
, V_MESSAGE
);
END;
DECLARE
V_MESSAGE VARCHAR2(1000);
BEGIN
v_message := 'Hello 歡迎光臨';
XXFND_MAIL.SEND ( 'tomkuo139@yahoo.com.tw, tom<tomkuo139@yahoo.com.tw>, aaa<tomkuo139@yahoo.com.tw>'
, ''
, ''
, 'Send 中文 Mail on PL/SQL'
, V_MESSAGE
);
END;
DECLARE
V_MESSAGE VARCHAR2(1000);
BEGIN
v_message := 'Hello 歡迎光臨';
XXFND_MAIL.SEND ( 'tomkuo139@yahoo.com.tw'
, 'tom<tomkuo139@yahoo.com.tw>'
, ''
, 'Send 中文 Mail on PL/SQL'
, V_MESSAGE
);
END;
DECLARE
V_MESSAGE VARCHAR2(1000);
BEGIN
v_message := 'HTML 語法';
-- 若要給別名, 則規則如右 : Alias , 否則 Alias = Mail-Address
XXFND_MAIL.SEND ( 'tom <tomkuo139@yahoo.com.tw>'
, 'chris <tomkuo139@yahoo.com.tw>'
, ''
, 'Send 中文 Mail on PL/SQL'
, V_MESSAGE
);
END;
DECLARE
File_id UTL_FILE.FILE_TYPE;
v_attach_file XXFND_MAIL.GF_FILE;
BEGIN
v_attach_file(1).file_path := '/usr/tmp';
v_attach_file(1).file_name := 'aaa.txt';
-- 建立 File Object
File_id := UTL_FILE.FOPEN(v_attach_file(1).file_path
, v_attach_file(1).file_name
, 'W'
);
-- 寫入資料並換行
UTL_FILE.PUT_LINE(File_id, '哈囉 Oracle ERP 1 !!');
UTL_FILE.PUT_LINE(File_id, '哈囉 Oracle ERP 2 !!');
UTL_FILE.PUT_LINE(File_id, '哈囉 Oracle ERP 3 !!');
-- 寫入資料但不換行
for i in 0..9 loop
UTL_FILE.PUT( File_id, to_char(i) );
end loop;
-- 釋放物件
UTL_FILE.FCLOSE(File_id);
-- Send Mail
XXFND_MAIL.SEND( 'tom <tomkuo139@yahoo.com.tw>'
, ''
, ''
, 'Send 中文 Mail on PL/SQL with Attachment'
, '可以有附檔功能喔 !!'
, true
, v_attach_file
);
END;
DECLARE
v_attach_blob XXFND_MAIL.GB_BLOB;
BEGIN
-- 抓取 Blob 資料
SELECT 'aaa.txt'
, blob_col
INTO v_attach_blob(1).blob_name
, v_attach_blob(1).blob_body
FROM TOM1
WHERE num_col = 1;
-- Send Mail
XXFND_MAIL.SEND( 'tom <tomkuo139@yahoo.com.tw>'
, ''
, ''
, 'Send 中文 Mail on PL/SQL with Attachment'
, '可以有附檔功能喔 !!'
, true
, v_attach_blob
);
END;
完整敘述如下 :
1) 收件者可以有多個, 用 "逗號" or "分號" 區隔
2) 收件者可以有中文顯示, 用 名稱
表示 (請見 Example 範例)
3) 可以指定 Cc, Bcc
4) 可以指定 郵件的優先權
5) Mail Body 可以有圖片顯示
6) Mail Body 可以顯示 HTML
7) Mail Body 可以超過 32k 限制
8) Mail 可有附檔, 多個附檔用 "Array" 區隔
9) Mail 也可將 Blob 資料當作附檔, 多個 Blob 附檔用 "Array" 區隔
10) 跨 Mail 收件軟體, Outlook / Outlook Express / ThunderBird / Yahoo Mail 都可正常收信
當然, 也感謝眾多朋友不斷告知需求與功能改善, 才會讓 Send Mail 愈來愈完善.
投影片, 目前只限站長瀏覽, Sorry :
