SQL Server發送郵件的存儲過程

来源:互联网 发布:javascript代码绕过 编辑:程序博客网 时间:2024/05/03 12:02

對於DB中的資料變更,有時會有寄Mail通知相關人員的需求。下面是實現這一功能的一種方法

1.建立發Mail的存儲過程

CREATE PROCEDURE [dbo].[sp_send_mail]   @From varchar(100) ,   @To varchar(2000) ,   @Subject varchar(2000)=" ",   @Body varchar(4000) =" ",  @BCC varchar(4000) =" "/******************************************This stored procedure takes the parameters and sends an e-mail. All the mail configurations are hard-coded in the stored procedure. Comments are added to the stored procedure where necessary. References to the CDOSYS objects are at the following MSDN Web site: http://msdn.microsoft.com/library/default.asp?url=/ library/en-us/cdosys/html/_cdosys_messaging.asp *******************************************/AS Declare @iMsg int    Declare @hr int    Declare @source varchar(255)    Declare @description varchar(500)    Declare @output varchar(2000)--***** Create the CDO.Message Object *****EXEC @hr = sp_OACreate 'CDO.Message', @iMsg OUT--*****Configuring the Message Object *****-- This is to configure a remote SMTP server.-- Replace MailServerName by the name or IP of your SMTP Server.EXEC @hr = sp_OASetProperty @iMsg, 'Configuration.fields ("http://schemas.microsoft.com/cdo/configuration/smtpserver").Value', 'xxxserver'-- http://msdn.microsoft.com/library/default.asp?url=/library/en-us/cdosys/html/_cdosys_schema_configuration_sendusing.aspEXEC @hr = sp_OASetProperty @iMsg, 'Configuration.fields ("http://schemas.microsoft.com/cdo/configuration/smtpserverport").Value','25'EXEC @hr = sp_OASetProperty @iMsg, 'Configuration.fields ("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate").Value','1'EXEC @hr = sp_OASetProperty @iMsg, 'Configuration.fields ("http://schemas.microsoft.com/cdo/configuration/sendusing").Value','2'EXEC @hr = sp_OASetProperty @iMsg, 'Configuration.fields ("http://schemas.microsoft.com/cdo/configuration/smtpaccountname").Value','admin@xxx.com'EXEC @hr = sp_OASetProperty @iMsg, 'Configuration.fields ("http://schemas.microsoft.com/cdo/configuration/sendusername").Value','admin@xxx.com'EXEC @hr = sp_OASetProperty @iMsg, 'Configuration.fields ("http://schemas.microsoft.com/cdo/configuration/sendpassword").Value','admin123'-- This is to configure the Server Name or IP address.-- Save the configurations to the message object.EXEC @hr = sp_OAMethod @iMsg, 'Configuration.Fields.Update', null-- Set the e-mail parameters.EXEC @hr = sp_OASetProperty @iMsg, 'To', @ToEXEC @hr = sp_OASetProperty @iMsg, 'From', @FromEXEC @hr = sp_OASetProperty @iMsg, 'Subject', @SubjectEXEC @hr = sp_OASetProperty @iMsg, 'Bcc', @Bcc-- If you are using HTML e-mail, use 'HTMLBody' instead of 'TextBody'.EXEC @hr = sp_OASetProperty @iMsg, 'HTMLbody', @Body--EXEC @hr = sp_OASetProperty @iMsg, 'TextBody', @BodyEXEC @hr = sp_OAMethod @iMsg, 'Send', NULL-- Sample error handling.IF @hr <>0  select @hr  BEGIN    EXEC @hr = sp_OAGetErrorInfo NULL, @source OUT, @description OUT    IF @hr = 0      BEGIN        SELECT @output = ' Source: ' + @source        PRINT @output        SELECT @output = ' Description: ' + @description        PRINT @output      END    ELSE      BEGIN        PRINT ' sp_OAGetErrorInfo failed.'        RETURN    END  END-- Do some error handling after each step if you have to.-- Clean up the objects created.EXEC @hr = sp_OADestroy @iMsg

2.調用存儲過程

對於資料變更,可再Trigger中調用這一存儲過程。也可以在SQL Server Agent中建立作業來調用,只需要傳入相應參數即可。


注:以上存儲過程有個缺陷,即@Body定義為varchar類型,而SQL Server中varchar類型長度最大是8000。也就是說一次最多只能發送8000個字符的內容。








原创粉丝点击