关于SQL数据库 msdb.dbo.sp_send_dbmail 函数发送邮件的几个实例
程序员文章站
2022-06-21 22:19:47
在推行系统中，时不时会有用户提出希望系统能自动推送邮件，由于手头的工具和能力有限，不少需求都借助于sql server的邮件触发来实现。 步骤： 1、配置邮箱。步骤略，网上有不少帖子说明，手工直接在管理-数据库邮件配置即可。配置完成后可以右键测试邮箱是否正常工作。 2、制作发送邮件脚本 3、sql ......
在推行系统中，时不时会有用户提出希望系统能自动推送邮件，由于手头的工具和能力有限，不少需求都借助于sql server的邮件触发来实现。
步骤：
1、配置邮箱。步骤略，网上有不少帖子说明，手工直接在管理-数据库邮件配置即可。配置完成后可以右键测试邮箱是否正常工作。
2、制作发送邮件脚本
3、sql server 代理定义周期计划
邮件脚本编写：
场景一：业务部门希望可以每周提供一次样品库存，即将sql查询的结果以附件的方式发给指定的人员。
1 exec msdb.dbo.sp_send_dbmail 2 @profile_name = '<账户名>', --定义好的sql server 邮箱账户名 3 @recipients = '<mail account>', --需要发送邮件的账号，多个用;间隔，建议通过一个邮件组来管理需要发送的地址 4 @body = 'the stored procedure finished successfully.', -- 邮件正文 5 @subject = '样品仓物料清单', --邮件抬头 6 @execute_query_database = 'ufdata_001_2016', --查询的数据库 7 8 --需要执行的查询 9 10 @query = 'select 11 distinct substring(cinvcode,4,100) 料号 12 from 13 currentstock 14 where 15 cwhcode = 12 16 and iquantity >=1', 17 @attach_query_result_as_file = 1, 18 @query_attachment_filename = 'item.csv'
邮件发送的结果
场景二，用户系统在oa系统完成的外部用户报备客户审批完成后触发邮件给对方。由于oa系统自动触发外部邮件格式有显示，据说需要js写代码，因为不熟悉，所以还是借助于sql server的邮件功能来实现。
预先写一个view，三个字段，需要发送的邮箱，邮件主题，邮件内容。
例子中将主题和主体做为一个，用到循环语句实现。
1 declare @mail nvarchar(200); 2 declare @note nvarchar(500); 3 4 declare c cursor --游标 5 for select email,note from cux_dls_notice_v where operatedate + ' '+ operatetime >= dateadd(minute,-60,getdate()) --取最近一小时的记录发送，计划任务是60分钟执行一次。 6 7 open c 8 fetch next from c into @mail,@note; 9 10 while @@fetch_status = 0 11 12 begin 13 14 exec msdb.dbo.sp_send_dbmail 15 @profile_name= '<账户名>', --定义好的sql server 邮箱账户名 16 @recipients=@mail, --需要发送的邮箱 17 @subject=@note, --邮件标题 18 @body=@note --邮件主题 19 fetch next from c into @mail,@note; 20 end 21 close c; 22 deallocate c;
场景三，还是在oa系统里，销售申请特价之后提交审批，审批人系统可以收到邮件通知，并在邮件中和销售讨论后，再回到系统中审批。由于申请表的内容多，需要用html的发送格式。
做法和场景二类似，重点是邮件主题需要生成为html的格式。
还是一样把需要展现的内容做成一个view，我个人喜欢做view，这样有什么变化调整view就可以了。
/*声明变量*/ declare @tablehtml varchar(max) declare @mail nvarchar(200); declare @note nvarchar(500); --设置问候词 set @tablehtml = '<html><body><table><tr><td><p><font color="#000080" size="3" face="verdana">您好！</font></p><p style="margin-left:30px;"><font size="3" face="verdana">请审批下面的价格申请：</font></p></td></tr>'; --设置表头 set @tablehtml=@tablehtml +'<tr><td><table border="1" style="border:1px solid #d5d5d5;border-collapse:collapse;border-spacing:0;margin-left:30px;margin-top:20px;"><tr style="height:25px;background-color: rgb(219, 240, 251);"> <th style="width:100px;">rfq no</th> <th style="width:200px;">sales</th> <th style="width:60px;">pl3</th> <th style="width:80px;">customer</th> <th style="width:100px;">disty_name</th> <th style="width:60px;">2nd disty</th> <th style="width:80px;">sold to customer</th> <th style="width:80px;">part no</th> <th style="width:100px;">currency</th> <th style="width:60px;">volume</th> <th style="width:100px;">requested dc</th> <th style="width:100px;">customer rp</th> <th style="width:100px;">competitor</th> <th style="width:100px;">competitor pn</th> <th style="width:80px;">competitor price</th></tr>'; --启用游标 declare c cursor for --查询结果 select a.email ,a.note ,@tablehtml+'<tr><td align="center">'+rfq_quotation_number+'</td>' +'<td align="center">'+lastname+'</td>' +'<td align="center">'+pl3+'</td>' +'<td align="center">'+customer+'</td>' +'<td align="center">'+disty_name+'</td>' +'<td align="center">'+snd_disty+'</td>' +'<td align="center">'+sold_to_customer+'</td>' +'<td align="center">'+fully_part_no+'</td>' +'<td align="center">'+currency+'</td>' +'<td align="center">'+volume+'</td>' +'<td align="center">'+requested_disty_cost+'</td>' +'<td align="center">'+cust_requested_price+'</td>' +'<td align="center">'+competitor+'</td>' +'<td align="center">'+competitor_part_no+'</td>' +'<td align="center">'+competitor_price+'</td></tr>' from ( select email ,note ,rfq_quotation_number ,lastname ,pl3 ,客户中文+'/'+客户英文 as customer ,disty_name ,snd_disty ,sold_to_customer ,fully_part_no ,currency ,isnull(cast(volume as nvarchar(10)),'') volume ,isnull(cast(requested_disty_cost as varchar(10)),'') requested_disty_cost ,isnull(cast(cust_requested_price as varchar(10)),'') as cust_requested_price ,isnull(cast(competitor as varchar(100)),'') competitor ,isnull(cast(competitor_part_no as varchar(50)),'') competitor_part_no ,isnull(cast(competitor_price as varchar(10)),'') competitor_price from cux_rfq_v where currentnodetype = 1 and lastoperatedate + ' '+ lastoperatetime >= dateadd(minute,-60,getdate()) --找最近60分的记录，并发送 ) a open c fetch next from c into @mail ,@note ,@tablehtml; while @@fetch_status = 0 begin exec msdb.dbo.sp_send_dbmail @profile_name= '<账户名>', --定义好的sql server 邮箱账户名 ,@recipients=@mail ,@subject=@note ,@body= @tablehtml ,@body_format='html' fetch next from c into @mail ,@note ,@tablehtml; end close c; deallocate c;
下一篇： 淋病的七饮食禁忌 淋病的饮食原则