无法通过trigger发送邮件

[sywen]

从网上找到一个通过utl_smtp发送email的procedure，成功发送，但是我想通过一个表的insert动作调用该precedure，邮件发送失败。
求大神指导。

[学海无涯-回头是岸]

说的东西也忒少了

[sywen]

网上有很多发送email的procedure，我copy了其中一个，测试发送是成功的
create or replace procedure Send_mail(mail_body varchar2) is
smtp_conn utl_smtp.connection;
user_name varchar2(20) := utl_raw.cast_to_varchar2(utl_encode.base64_encode(utl_raw.cast_to_raw('[e-mail]')));
user_paswd varchar2(20) := utl_raw.cast_to_varchar2(utl_encode.base64_encode(utl_raw.cast_to_raw('password')));
lv_mail_header varchar2(200):='From:[e-mail]'||utl_tcp.CRLF||
'To:[e-mail]'||utl_tcp.CRLF||
'Subject:Oracle数据库'||utl_tcp.CRLF;
lv_mail_content varchar2(2000);
begin
lv_mail_content := utl_tcp.CRLF||mail_body;

smtp_conn := utl_smtp.open_connection('smtp.email.com',25);
utl_smtp.helo(smtp_conn,'smtp.email.com');
utl_smtp.command(smtp_conn,'AUTH LOGIN');
utl_smtp.command(smtp_conn,user_name); --邮件用户名
utl_smtp.command(smtp_conn,user_paswd); --邮件密码
utl_smtp.mail(smtp_conn,'<[e-mail]>'); --发件人邮箱
utl_smtp.rcpt(smtp_conn,'<[e-mail]>'); --收件人邮箱
utl_smtp.open_data(smtp_conn);
utl_smtp.write_data(smtp_conn,utl_raw.cast_to_raw(lv_mail_header));
utl_smtp.write_raw_data(smtp_conn,utl_raw.cast_to_raw(lv_mail_content));
utl_smtp.close_data(smtp_conn);
utl_smtp.quit(smtp_conn);
exception
when others then
utl_smtp.quit(smtp_conn);
end Send_mail;
/

以上procedure测试发送没问题，但是放到trigger里，发送不成功
CREATE OR REPLACE TRIGGER ZXW_AMT_TRIG
BEFORE INSERT
ON ZXW_AMT
REFERENCING NEW AS NEW OLD AS OLD
FOR EACH ROW
DECLARE

BEGIN
IF INSERTING THEN
SEND_MAIL('测试内容');
END IF;
END;
/

[学海无涯-回头是岸]

好像没有REFERENCING NEW AS NEW OLD AS OLD这一句，
你可以在 下面 的send_mail前面，加一点东西，比如dbms_output或者放点东西 到测试表 测试你的触发器是否可行。
建议用after 触发

[sywen]

用了after还是不行

[sywen]

已解决，Trigger不能运行包含有execute之类的操作语句。

[学海无涯-回头是岸]

引用 5 楼 sywen 的回复:

已解决，Trigger不能运行包含有execute之类的操作语句。

你这trigger里面也没有动态sql啊