SQL Server发送邮件

转载 2007年09月28日 14:55:00

CREATE PROCEDURE usp_sendmail
(@server varchar(20), --服务器
 @From varchar(1000),
 @To varchar(1000),
 @Bcc varchar(500)='',
 @Subject nvarchar(400)='',
 @Body nvarchar(4000),
 @errnum int output
)
AS

Declare @object int
Declare @hr int

set @errnum=0 --正确的

EXEC @hr = sp_OACreate 'cdo.Message', @object OUT

EXEC @hr = sp_OASetProperty @object, 'Configuration.fields("http://schemas.microsoft.com/cdo/configuration/sendusing").Value','2'
EXEC @hr = sp_OASetProperty @object, 'Configuration.fields("
http://schemas.microsoft.com/cdo/configuration/smtpserver").Value', @server

EXEC @hr = sp_OASetProperty @object, 'Configuration.fields("http://schemas.microsoft.com/cdo/configuration/usemessageresponsetext").Value','1'
--EXEC @hr = sp_OASetProperty @object, 'Configuration.fields("http://schemas.microsoft.com/cdo/configuration/LanguageCode").Value',' 2052'

--下面三条语句是smtp验证,如果服务器需要验证,则必须要这三句,你需要修改用户名和密码
EXEC @hr = sp_OASetProperty @object, 'Configuration.fields("
http://schemas.microsoft.com/cdo/configuration/smtpauthenticate").Value','0'
EXEC @hr = sp_OASetProperty @object, 'Configuration.fields("
http://schemas.microsoft.com/cdo/configuration/sendusername").Value',''
EXEC @hr = sp_OASetProperty @object, 'Configuration.fields("
http://schemas.microsoft.com/cdo/configuration/sendpassword").Value',''

--EXEC @hr = sp_OASetProperty @object, 'Configuration.fields("http://schemas.microsoft.com/cdo/configuration/sendusername").Value','lihonggen0'
--EXEC @hr = sp_OASetProperty @object, 'Configuration.fields("
http://schemas.microsoft.com/cdo/configuration/sendpassword").Value','xxx'

EXEC @hr = sp_OAMethod @object, 'Configuration.Fields.Update', null
EXEC @hr = sp_OASetProperty @object, 'To', @To
EXEC @hr = sp_OASetProperty @object, 'BodyPart.Charset','GB2312'
EXEC @hr = sp_OASetProperty @object, 'Bcc', @Bcc
EXEC @hr = sp_OASetProperty @object, 'From', @From
EXEC @hr = sp_OASetProperty @object, 'Subject', @Subject

EXEC @hr = sp_OASetProperty @object, 'TextBody',@Body
EXEC @hr = sp_OAMethod @object, 'Send', NULL

--判断出错
IF @hr <> 0
BEGIN
   EXEC sp_OAGetErrorInfo @object 
   set @errnum=@hr
   RETURN @object
END
--PRINT 'success'
EXEC @hr = sp_OADestroy @object

GO

SQL SERVER 2008自动发送邮件(完整版)

这两天都在搞这个东西,从开始的一点不懂,到现在自己可以独立的完成这个功能!在这个过程中,CSDN的好多牛人都给了我很大的帮助,在此表示十二分的感谢!写这篇文章,一是为了巩固一下,二嘛我也很希望我写的这...
  • weizhiai12
  • weizhiai12
  • 2014年01月17日 14:25
  • 3690

SQLServer Job 邮件发送

SQLServer Job 邮件发送 为了方便查看定时任务执行是否成功,同时能够及时发现存储过程中抛出的异常,采用发送邮件的方式来提醒这些问题。 邮件设置 邮件服务器名称:smtp.qq...
  • mh942408056
  • mh942408056
  • 2016年12月04日 12:46
  • 957

解析如何通过SQLServer的数据库邮件来发送邮件

通过SQL Server,也可以发送邮件,而且配置过程也是非常的简单,只需要你有邮箱就行。 下面就通过SQL Server来发送邮件。 一、启用Database Mail XPs功能。 查看Da...
  • xiaowei_sql
  • xiaowei_sql
  • 2016年03月08日 15:46
  • 2173

SQL Server 2008 通过配置数据库邮件实现发送邮件功能

1.简单了解数据库邮件的概念和使用的传输协议及系统体系:       数据库邮件是从 SQL Server 数据库引擎中发送电子邮件的企业解决方案。通过使用数据库邮件,数据库应用程序可以向用户发送电...
  • zhanglong_longlong
  • zhanglong_longlong
  • 2014年12月31日 13:40
  • 1605

SQL SERVER 自动监控数据库异常,自动发送邮件通知

以下为 存储过程,注意:以下倒首第三行部分的@recipients 参数需要改成您实际的电子邮箱。 运行环境:SQL SERVER 2014 USE [master] GO /*****...
  • keenweiwei
  • keenweiwei
  • 2016年03月18日 11:59
  • 1091

SQL SERVER 2000发邮件的存储过程

CREATE PROCEDURE [dbo].[send_mail]   @From varchar(1000) ,  --发件人   @To varchar(1000) ,   --收件人   @S...
  • neekerss
  • neekerss
  • 2009年05月14日 11:41
  • 784

触发器的使用 sqlserver中 数据库自动发送邮件功能

有一天在群里 有一个小孩子问:当一张表新增记录后,我要给这条记录关联联系人发送邮件,怎么配置数据库,求教 孤陋寡闻的我:不应该和配置数据库有关系吧  你就在代码里面写了insert 操作之后 调用...
  • u013547384
  • u013547384
  • 2016年11月19日 17:19
  • 989

通过SQL Server的数据库邮件功能功能发送邮件

通过SQL Server,也可以发送邮件,而且配置过程也是非常的简单,只需要你有邮箱就行。   下面就通过SQL Server的数据库邮件功能功能发送邮件。     一、启用Database...
  • yupeigu
  • yupeigu
  • 2014年03月28日 14:03
  • 3939

SQL Server中调用存储过程发送邮件

EXEC msdb.dbo.sp_send_dbmail      @profile_name = N'smtp',  /** 发送邮件的配置文件名称 **/      @recipients ...
  • yagas
  • yagas
  • 2014年09月15日 11:42
  • 1000

Sql Server sql语句中发送电子邮件

SQL Server 并没有内置邮件服务器(Mail Server),它跟我们发送邮件一样,需要用户名和密码通过 SMTP(Simple Message Transfer Protocol)去连接邮件...
  • taoerchun
  • taoerchun
  • 2017年03月24日 17:31
  • 353
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:SQL Server发送邮件
举报原因:
原因补充:

(最多只允许输入30个字)