• 软件测试技术
  • 软件测试博客
  • 软件测试视频
  • 开源软件测试技术
  • 软件测试论坛
  • 软件测试沙龙
  • 软件测试资料下载
  • 软件测试杂志
  • 软件测试人才招聘
    暂时没有公告

字号: | 推荐给好友 上一篇 | 下一篇

SQL邮件自动应答(根据收到的邮件中的查询语句回复语句执行结果)

发布: 2007-7-02 11:08 | 作者: admin | 来源: | 查看: 16次 | 进入软件测试论坛讨论

领测软件测试网
SQLMail可以收发邮件,可能好多人都有xp_sendmail发送过邮件,
这里介绍一种邮件服务器接收邮件后,根据邮件内容(只能是查询语句)
把邮件中的查询语句执行后的结果以附件形式自动返回给发送邮件者。

eg:
发送邮件,邮件内容为: select top 10 id,name from sysobjects
则服务器自动回复邮件,内容为上述查询语句的执行结果,以附件形式发送。


1:当然是先配置好SQL邮件服务了,这方面的资料比较多,此处不赘述。

2: 把sp_processmail稍作修改 (把发件人的邮件地址解析为真正的邮箱地址)

Alter procedure sp_processmail
 @subject varchar(255)=NULL, 
 @filetype varchar(3)=@#txt@#, 
 @separator varchar(3)=@#tab@#, 
 @set_user varchar(132)=@#guest@#, 
 @dbuse varchar(132)=@#master@# 
as 
 
declare @status int 
declare @msg_id varchar(64) 
declare @originator varchar(255) 
declare @originator_address varchar(255) 
declare @a varchar(255)

declare @cc_list varchar(255) 
declare @msgsubject varchar(255) 
declare @query varchar(8000) 
declare @messages int 
declare @mapifailure int 
declare @resultmsg varchar(80) 
declare @filename varchar(12) 
declare @current_msg varchar(64) 
 
select @messages=0 
select @mapifailure=0 
 
if @separator=@#tab@# select @separator=CHAR(9) 
 
/* get first message id */ 
exec @status = master.dbo.xp_findnextmsg 
  @msg_id=@msg_id output, 
  @unread_only=@#true@# 
 
if @status <> 0 
 select @mapifailure=1 
 
while (@mapifailure=0) 
  begin 
 
    if @msg_id is null break 
    if @msg_id = @#@# break 
 
    exec @status = master.dbo.xp_readmail 
  @msg_id=@msg_id, 
  @originator=@originator output, 
  @cc_list=@cc_list output, 
  @subject=@msgsubject output, 
  @message=@query output, 
  @peek=@#true@#, 
  @originator_address= @originator_address output,
  @suppress_attach=@#true@# 
 
    if @status <> 0 
 begin 
  select @mapifailure=1 
  break 
 end 
 
    /* get new message id before processing & deleting current */ 
 select @current_msg=@msg_id 
 exec @status = master.dbo.xp_findnextmsg 
  @msg_id=@msg_id output, 
  @unread_only=@#true@# 
 
     if @status <> 0 
 begin 
  select @mapifailure=1 
 end 
 
 
    if ((@subject IS NULL) OR (@subject=@msgsubject)) 
    begin 
 /* generate random filename */ 
 select @filename=@#SQL@# + convert(varchar,ROUND(RAND()*100000,0)) + @#.@# + @filetype 
 
 exec @status = master.dbo.xp_sendmail 
--   @recipients=@originator, 
   @recipients=@originator_address, 
   @copy_recipients=@cc_list, 
   @message=@query, 
   @query=@query, 
   @subject=@#Query Results@#, 
   @separator=@separator, 
   @width=256, 
   @attachments=@filename, 
   @attach_results=@#true@#, 
   @no_output=@#false@#, 
   @echo_error=@#true@#, 
   @set_user=@set_user, 
   @dbuse=@dbuse 
 
 if @status <> 0 
  begin 
   select @mapifailure=1 
   break 
  end 
 
 select @messages=@messages+1 
 
 exec master.dbo.xp_deletemail @current_msg 
 
    end /* end of xp_sendmail block */ 
  end  /* end of xp_findnextmsg loop */ 
 
  /* finished examining the contents of inbox;  now send results */ 
  if @mapifailure=1 
       begin 
  raiserror(15079,-1,-1,@messages) 
  return(1) 
 end 
  else 
 return(0) 
-- sp_processmail 

3:在master数据库下建一个存储过程
use master
create proc answerMail
as
sp_processmail  @subject = @#sql@#,@filetype = @#CSV@#,@separator =@#,@#,@set_user = @#dbo@# ,@dbuse =  @#数据库名@#


4:
用job调度此存储过程。

5:
现在可以测试了。
发一封邮件给服务器上配置的邮箱地址。
主题为  sql
内容为 一句简单的查询语句 eg:  select getdate()
发送

6: 等到job调度时间到后即可收到回复。

 

(以上在 windows2000 + SQL2000+Microsoft Outlook上测试通过)

 

延伸阅读

文章来源于领测软件测试网 https://www.ltesting.net/


关于领测软件测试网 | 领测软件测试网合作伙伴 | 广告服务 | 投稿指南 | 联系我们 | 网站地图 | 友情链接
版权所有(C) 2003-2010 TestAge(领测软件测试网)|领测国际科技(北京)有限公司|软件测试工程师培训网 All Rights Reserved
北京市海淀区中关村南大街9号北京理工科技大厦1402室 京ICP备10010545号-5
技术支持和业务联系:info@testage.com.cn 电话:010-51297073

软件测试 | 领测国际ISTQBISTQB官网TMMiTMMi认证国际软件测试工程师认证领测软件测试网