6. SQL Server数据库监控 - 如何告警

浏览数：33 / 时间：2015年06月12日

常用的告警方式大致有：短信、邮件、应用程序 (beep提示，图标提示，升窗提示等)，可是不能一直坐在电脑前看着应用程序，或者用脚本部署监控，根本没有程序界面，所以通常用短信、邮件两种方式告警。

一. 告警方式

1. 短信

用程序发短信的方式一般有这两种：

(1) 硬件

需要1张SIM卡，1个SIM卡读卡设备 (比如：短信猫)，然后把设备连接到电脑，应用程序根据设备的软件接口，传参并发送短信。记得把SIM卡设备放在信号好，无干扰的地方；

如果有大量短信要发，1张SIM卡是不够用的，而且发送过度频繁，可能被运营商视为恶意短信，把SIM卡号加入黑名单，那么就需要多张SIM卡甚至多个读卡设备。

显示号码为当前SIM卡号码，大多供应商都支持DLL、HTTP等多种接口，当然也可以基于接口二次开发。

DLL接口方法参考：SmsManager.sendTextMessage(…)

(2) 第三方短信接口

有多种接口形式提供，比如：Web Service形式，HTTP形式，还有邮件接口：往[email protected]发个短小的邮件，这个邮件会以短信的形式转发到手机上，等等。只要往接口传参数，告诉它发给谁，发什么内容，就可以了。

显示号码为某个SIM卡号码，或者为106开头的固定号码，这取决于短信平台和运营商的实现方式，因为运营商发短信是不要卡的，直接可以发给目标号码，而且可以显示为固定的某个号码。

Web Service接口地址参考：http://123.456.789.000/SmsManager.asmx?wsdl

Http接口地址参考：http://api.abc.xyz/sms/send.html

2. 邮件

凡是实现了SMTP协议的组件，都可以发送邮件。

在Windows环境下，有系统自带的组件CDO (Collaboration Data Objects，以前叫OLE Messaging 或者Active Messaging)，是MAPI库的COM封装。不管是自己开发程序，使用VBS，还是SQL Server的SQL Mail/Database Mail，通常都是调用的这个组件。

SMTP协议要求的参数大致如下：

SMTP Hostname: SMTP服务器名，如mail.test.com或者IP

SMTP Port: SMTP服务端口，25

SMTP Username: 通过SMTP发送邮件用来验证的用户名, 如果不要求身份验证，留空

SMTP Password: 通过SMTP发送邮件用来验证的密码, 如果不要求身份验证，留空

二. 选择告警方式并配置

1. 短信

不管是选择硬件，还是第三方接口，都需要一个程序来调用，可以是监控工具、脚本、甚至数据库。

(1) 监控工具/应用程序中，通常都留有短信接口的配置，配置接口地址即可；

(2) 在脚本中配置，Windows环境通常要借助OLE Automation；

OLE Automation后来改名叫Automation，是Windows上基于COM，用于脚本语言实现进程间通讯的机制，脚本如：VBS, SQL, Powershell，不包括BAT(BAT可以调用VBS)。

SQL Server中使用OLE Automation调用Web Service短信接口如下：

exec sp_configure ‘show advanced options‘, 1;
RECONFIGURE;
exec sp_configure ‘Ole Automation Procedures‘, 1;
RECONFIGURE;

declare @text_message nvarchar(180)
       ,@phone_number nvarchar(15)
       ,@soap_object  int
       ,@status       int
       ,@output       nvarchar(255)

set @text_message = N‘Testing Mail‘
set @phone_number = N‘138000139000‘

--Create MSSOAP.SoapClient object
exec @status=sp_OACreate ‘MSSOAP.SoapClient‘, @soap_object out

--SmsManager is Web Service name
exec @status = sp_OAMethod @object, ‘mssoapinit‘, null, ‘http://123.456.789.000/SmsManager.asmx?wsdl‘, ‘SmsManager‘

--SendTextMessage is webservice method
exec @status = sp_OAMethod @object, ‘SendTextMessage‘, @output OUT, @phone_number, @text_message

if @status <> 0
begin
   exec sp_OAGetErrorInfo @soap_object   
   select @soap_object
end
else
begin
   select @output
end

--Destroy MSSOAP.SoapClient object
exec @status = sp_OADestroy @soap_object
GO

对于HTTP, DLL接口，和SOAP接口类似，用OLE Automation也都可以调用，主要区别就是在CreateObject() 时。

以VBS为例，调用HTTP, DLL时CreateObject()如下：

Dim http 
Set http = CreateObject("Msxml2.XMLHTTP") 

Dim dll
Set dll = CreateObject("工程名.类名")

2. 邮件

(1) 监控工具/应用程序中，通常都留有SMTP配置项，配置SMTP参数即可；

(2) 在脚本中配置，Windows环境通常要借助OLE Automation；

VBS发送邮件如下：

Dim ns
ns = "http://schemas.microsoft.com/cdo/configuration/"

Dim title, content
title = "db_maint_alert"
content = ""
content = content&"Hi All,"
content = content&chr(13)&chr(10)
content = content&" "
content = content&chr(13)&chr(10)
content = content&"----test mail----"
Msgbox(‘~1~‘)

Set cm = CreateObject("CDO.Message")
cm.from = "[email protected]"    
cm.to = "[email protected]"
cm.cc = "[email protected]"
cm.subject = title
cm.textbody = content
‘cm.AddAttachment ""
Msgbox(‘~2~‘)

‘sendusing: 1 = pickup, 2 = port
‘smtpauthenticate: 0 = anonymous,1 = common,2 = NTLM
‘smtpusessl: 0 = no,1 = yes
With cm.configuration.fields
    .item(ns & "sendusing") = 2
    .item(ns & "smtpserver") = "xxx.xxx.xxx.xxx"
    .item(ns & "smtpserverport") = 25
    .item(ns & "smtpauthenticate") = 1
    .item(ns & "sendusername") = "[email protected]"
    .item(ns & "sendpassword") = "*****************"
    .item(ns & "smtpconnectiontimeout") = 10
    .item(ns & "smtpusessl") = 0
    .update
End With
Msgbox(‘~3~‘)

cm.send
Set cm = nothing
Msgbox(‘~success~‘)

SQL Server 2000发送邮件如下：

SQL Server 2000有SQL Mail，不过必须要同服务器上安装一个实现了MAPI的邮件程序，如：OUTLOOK，因为SQL Mail需要借用邮件应用程序的MAPI来发送邮件，配置起来不太方便，所以使用类似上面VBS的OLE Automation方法。

use master;
if OBJECT_ID(‘sp_SendDatabaseMail‘) is not null 
    drop proc sp_SendDatabaseMail
go

CREATE PROCEDURE sp_SendDatabaseMail
        @recipients varchar(8000), --‘[email protected]; [email protected];‘
        @Subject    varchar(400) = ‘‘,
        @HtmlBody   varchar(8000) = ‘‘
as
Declare @From varchar(100)
Declare @To varchar(100)
Declare @Bcc varchar(500)
Declare @AddAttachment varchar(100)
Declare @object int
Declare @hr int
Declare @source varchar(255) 
Declare @description varchar(500) 
Declare @output varchar(1000)

    set @From = ‘[email protected]‘
    set @To = @recipients
    set @Bcc = ‘‘
    set @AddAttachment = ‘‘
    --set @HtmlBody= ‘<body><h1><font color=Red>‘ +@HtmlBody+‘</font></h1></body>‘

    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‘, ‘xxx.xxx.xxx.xxx‘ 
    EXEC @hr = sp_OASetProperty @object, ‘Configuration.fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport").Value‘,‘25‘ 
    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‘,‘[email protected]‘ 
    EXEC @hr = sp_OASetProperty @object, ‘Configuration.fields("http://schemas.microsoft.com/cdo/configuration/sendpassword").Value‘,‘*****************‘ 
    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, ‘HtmlBody‘, @HtmlBody 

--add attachment
    if @AddAttachment<>‘‘
    EXEC @hr = sp_OAMethod @object, ‘AddAttachment‘,NULL,@AddAttachment
    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 

--send mail
EXEC @hr = sp_OAMethod @object, ‘Send‘, NULL 
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
PRINT ‘Send Success!!!‘ 

--destroy object
EXEC @hr = sp_OADestroy @object

SQL Server 2005起，使用Database Mail，脚本如下：

--1. 启用database mail
use master
GO
exec sp_configure ‘show advanced options‘,1
reconfigure
exec sp_configure ‘Database mail XPs‘,1
reconfigure
GO

--2. 添加account
exec msdb..sysmail_add_account_sp
        @account_name            = ‘SqlAlert‘                -- mail account
       ,@email_address           = ‘[email protected]‘       -- sendmail address
       ,@display_name            = ‘SqlAlert‘                -- sendusername
       ,@replyto_address         = null
       ,@description             = null
       ,@mailserver_name         = ‘***,***,***,***‘         -- SMTP Address
       ,@mailserver_type         = ‘SMTP‘                    -- SQL 2005 only support SMTP
       ,@port                    = 25                        -- port
       --,@username                = ‘*********@test.com‘    -- account
       --,@password                = ‘******************‘    -- pwd
       ,@use_default_credentials = 0
       ,@enable_ssl              = 0                         --is ssl enabled on SMTP server
       ,@account_id              = null

--3. 添加profile 
exec msdb..sysmail_add_profile_sp 
            @profile_name = ‘SqlAlert‘         -- profile name 
           ,@description  = ‘dba mail profile‘ -- profile description 
           ,@profile_id   = null

--4. 关联account and profile 
exec msdb..sysmail_add_profileaccount_sp  
            @profile_name    = ‘SqlAlert‘     -- profile name 
           ,@account_name    = ‘SqlAlert‘     -- account name
           ,@sequence_number = 1              -- account order in profile  
                                         
--5. 发送database mail
EXEC msdb.dbo.sp_send_dbmail 
        @profile_name = ‘SqlAlert‘,
        @recipients = ‘[email protected]; [email protected];‘, 
        @body = ‘This is a testing mail‘,
        @subject = ‘Testing Database Mail‘;
GO