繁體中文当前位置: 首页 > 图文教程 > 数据库 > MSSQL > SQL Server中发送邮件的新方式
- MSSQL
- 在SQL Server所在的计算机上运行病毒扫描软件
- 使用SQL Server导入和索引 Microsoft Word 文档
- TOPN 子句与SET ROWCOUNTN 之对比
- 使用Transact-SQL计算SQL Server处理器的数量
- SQL Server中全角和半角字符的比较问题
- SQL Server数据库性能的优化
- Win9x平台上SQL Server 2000的性能和局限
- 如何识别真实和自动创建的索引？
- 修复SQLSERVER2000数据库之实战经验
- 将一个更新划分为几个批次
- 一种基于记录集查找特定行的方法
- 将XML文件导入SQL Server 2000
- 将列更新从一个表传递到另一个表
- 打开UDP端口1434以浏览命名实例
- 如何使用系统管理员帐户管理多个开发人员？
- 设计数据库之经验谈
- 数据库的查询优化技术
- 小写转大写金额
- SQL技巧：创建用来按小时报告的查询
- SQL语句的自动优化
MSSQL 中的 SQL Server中发送邮件的新方式
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-10-30 浏览: 86 ::
收藏到网摘: n/a
{
MailMessage mail = new MailMessage();
mail.To = "[email protected]";
mail.From = "[email protected]";
mail.Subject = "this is a test email.";
mail.Body = "Some text goes here";
mail.Fields.Add("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate", "1"); //basic authentication
mail.Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendusername", "my_username_here"); //set your username here
mail.Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendpassword", "super_secret"); //set your password here
SmtpMail.SmtpServer = "mail.mycompany.com"; //your real server goes here
SmtpMail.Send( mail );
}
以前我曾写过在.NET下发送邮件的方法，详见:
http://dev.csdn.net/develop/article/17/17189.shtm
SQL Server中，我们一般使用SQL本身的邮件发送方式，但需要配置Exchage Server、Outlook等，也是一个比较繁琐的事情。很多人抱怨说配置不成功。
其实，我们可以在 SQL Server中创建 OLE 对象实例，调用IIS SMTP自带的发送组件来实现邮件发送。
我们建立这个存储过程，你需要修改的地方是，SmtpServer的名字
Create PROCEDURE sys_sendmail @From varchar(100) , @To varchar(100) , @Bcc varchar(500), @Subject varchar(400)=" ", @Body ntext =" "
AS
Declare @object int
Declare @hr int
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’, ’smtp.163.com’
--下面三条语句是smtp验证，如果服务器需要验证，则必须要这三句，你需要修改用户名和密码
EXEC @hr = sp_OASetProperty @object, ’Configuration.fields("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate").Value’,’1’
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, ’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
RETURN @object
END
PRINT ’success’
EXEC @hr = sp_OADestroy @object
GO 注意:必须确保安装Smtp，可以访问CDO对象。
评论 (0) All
