时间：2021-07-01 10:21:17 帮助过：30人阅读
常用的告警方式大致有：短信、邮件、应用程序 (beep提示，图标提示，升窗提示等)，可是不能一直坐在电脑前看着应用程序，或者用脚本部署监控，根本没有程序界面，所以通常用短信、邮件两种方式告警。 一 . 告警方式 1. 短信 用程序发短信的方式一般有这两种
常用的告警方式大致有：短信、邮件、应用程序 (beep提示，图标提示，升窗提示等)，可是不能一直坐在电脑前看着应用程序，或者用脚本部署监控，根本没有程序界面，所以通常用短信、邮件两种方式告警。
一. 告警方式
1. 短信
用程序发短信的方式一般有这两种：
(1) 硬件
需要1张SIM卡，1个SIM卡读卡设备 (比如：短信猫)，然后把设备连接到电脑，应用程序根据设备的软件接口，传参并发送短信。记得把SIM卡设备放在信号好，无干扰的地方；
如果有大量短信要发，1张SIM卡是不够用的，而且发送过度频繁，可能被运营商视为恶意短信，把SIM卡号加入黑名单，那么就需要多张SIM卡甚至多个读卡设备。
显示号码为当前SIM卡号码，大多供应商都支持DLL、HTTP等多种接口，当然也可以基于接口二次开发。
DLL接口方法参考：SmsManager.sendTextMessage(…)
(2) 第三方短信接口
有多种接口形式提供，比如：Web Service形式，HTTP形式，还有邮件接口：往1380013900@xxx.com发个短小的邮件，这个邮件会以短信的形式转发到手机上，等等。只要往接口传参数，告诉它发给谁，发什么内容，就可以了。
显示号码为某个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_numbernvarchar(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&"----testmail----"
Msgbox('~1~')
Set cm =CreateObject("CDO.Message")
cm.from ="from_user_name@abc.com"
cm.to = "to_user_name@abc.com"
cm.cc = "cc_user_name@abc.com"
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") = "user_name@abc.com"
.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 PROCEDUREsp_SendDatabaseMail
@recipients varchar(8000), --'001@abc.com; 002@abc.com;'
@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 = 'SqlAlert@abc.com'
set @To = @recipients
set @Bcc = ''
set@AddAttachment = ''
--set @HtmlBody='' +@HtmlBody+'
'
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','user_name@abc.com'
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_OAGetErrorInfoNULL, @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_OAGetErrorInfoNULL, @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 'SendSuccess!!!'
--destroy object
EXEC @hr =sp_OADestroy@object调用上面这个SP来发邮件：
EXEC sp_SendDatabaseMail
@recipients= '001@test.com;002@test.com;',
@body ='This is a testing mail',
@HtmlBody ='Testing Database Mail'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 = 'SqlAlert@test.com' -- sendmailaddress
,@display_name = 'SqlAlert' --sendusername
,@replyto_address = null
,@description = null
,@mailserver_name = '***,***,***,***' -- SMTPAddress
,@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' -- profilename
,@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 ='001@test.com; 002@test.com;',
@body ='This is a testing mail',
@subject ='Testing Database Mail';
GO注意：SMTP服务器的配置，比如：是否使用smtp用户验证，SSL是否开启，必须要和服务端一致，否则无法发送邮件。
其他
(1) 告警的次数：被告警的问题也许正在处理中，告警还在反复频繁发送，尤其用脚本轮询时，注意设置次数和发送间隔；
(2) 告警的历史记录：短信或者邮件告警，最好都在数据库中留一份记录；
(3) 字符编码：如果应用程序/接口不支持中文，可以把中文转成UTF-8的字符编码发送，然后再解析回来。