首先，我们看看如何利用Oracle实现发送电子邮件到指定邮箱，在网上可以找到很多这类存储过程的代码，此处引用的链接是http://liangchuan888.blog.sohu.com/159096370.html，作者suk的原始代码可能是在http://space6212.itpub.net/post/12157/161794，在此就不深究其来源了，我对代码稍有修改，下面直接给出能够正常执行的代码如下：
CREATE OR REPLACE PROCEDURE PROCSENDEMAIL(P_TXT VARCHAR2,
P_SUB VARCHAR2,
P_SENDOR VARCHAR2,
P_RECEIVER VARCHAR2,
P_SERVER VARCHAR2,
P_PORT NUMBER DEFAULT 25,
