在 SQL Server 2000 中发送电子邮件警报

Question

您好，我想在检查查询结果后发送电子邮件警报，该查询将返回表中的行数。 有谁知道我如何在 2005 年的 SQL Server 2000 中做到这一点，我会使用维护计划，但不确定在 2000 年如何？

Answer 1

我几年前就这样做了——匆忙改编自 MS 知识库文章。 我将参数更改为硬编码变量。 我已经从这里删除了识别服务器名称/电子邮件地址等，但您应该能够弄清楚！

创建过程 [dbo].[usp_SendSuccessMail]
--改编自 Microsoft 知识库文章，2006 年 1 月 16 日

--   @From varchar(100) ,
 --  @To varchar(100) ,
  -- @Subject varchar(100)=" ",
   --@Body 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 @From varchar(100) --origninally passed as parameter above. We want to hard-code it.
   Declare @To varchar(100) --origninally passed as parameter above. We want to hard-code it.
   Declare @Subject varchar(100) --origninally passed as parameter above. We want to hard-code it.
   Declare @Body varchar(4000) --origninally passed as parameter above. We want to hard-code it.
   Declare @iMsg int
   Declare @hr int
   Declare @source varchar(255)
   Declare @description varchar(500)
   Declare @output varchar(1000)
   Set @From = '[email protected]'
   Set @To = '[email protected]'
   Set @Subject = 'Whatever Subject You Want'
   Set @Body = 'Some useful text'


--************* Create the CDO.Message Object ************************
   EXEC @hr = sp_OACreate 'CDO.Message', @iMsg OUT
   IF @hr <>0 BEGIN
print 'sp_OACreate failed'
   END

--***************Configuring the Message Object ******************
-- This is to configure a remote SMTP server.
-- http://msdn.microsoft.com/library/default.asp?url=/library/en-us/cdosys/html/_cdosys_schema_configuration_sendusing.asp
   EXEC @hr = sp_OASetProperty @iMsg, 'Configuration.fields("http://schemas.microsoft.com/cdo/configuration/sendusing").Value','2'
-- This is to configure the Server Name or IP address.
-- 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', 'mail.xxxxxxxxxx.com'
-- 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', @To
   EXEC @hr = sp_OASetProperty @iMsg, 'From', @From
   EXEC @hr = sp_OASetProperty @iMsg, 'Subject', @Subject
-- If you are using HTML e-mail, use 'HTMLBody' instead of 'TextBody'.
   EXEC @hr = sp_OASetProperty @iMsg, 'TextBody', @Body
   EXEC @hr = sp_OAMethod @iMsg, 'Send', NULL
   IF @hr <>0
     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

     END

-- Do some error handling after each step if you have to.
-- Clean up the objects created.
    send_cdosysmail_cleanup:
If (@iMsg IS NOT NULL) -- if @iMsg is NOT NULL then destroy it
BEGIN
    EXEC @hr=sp_OADestroy @iMsg

END
ELSE
BEGIN
    PRINT ' sp_OADestroy skipped because @iMsg is NULL.'

        RETURN
END

。GO

Answer 2

因为 SQLMail 对于现实世界的使用（MAPI 等）来说毫无用处，所以我们最终使用了 SQLAnswersMail，这是非常好的功能强大且易于使用。

Answer 3

也许 CDOSYS 可以满足您的需求，请检查下面的链接

• 配置SQL Server 2000
  使用 CDOSys 进行通知
• 如何在 SQL Server 中不使用 SQL Mail 的情况下发送电子邮件？

Answer 4

试试这个：

xp_smtp_sendmail

链接

http://www.sqldev.net/xp/xpsmtp.htm

我之前在生产中使用过它，效果很好。