Capítulo 7: Administración
Enlaces
Estado del servidor
Programa para recibir un aviso si el servicio MySQL no arranca correctamente.
En Windows
<job id="servicio">;
Dim oArgs 'As WScript.Arguments
Set oArgs = WScript.Arguments
Dim sDestinatario 'As String
Dim sRemitente 'As String
Dim objMessage 'As CDO.Message
sDestinatario = oArgs(0)
sRemitente = oArgs(1)
Set oCorrele = _
WScript.CreateObject("CDO.Message")
With oCorrele
.To = sDestinatario
.From = sRemitente
.Subject = "MySQL no pudo arrancar | " & _
Date & "-" & Time
.Send
End With
Set oCorrele = Nothing
</job>;
En Linux
PARA='andy@enreas.com'
DE='From: mysql@enreas.com'
ASUNTO='Subject: MySQL no pudo arrancar'
FECHA=`date +%d/%m/%Y-%k:%M:%S`
`rm -f /tmp/correle.mysql`
echo ${DE}>>/tmp/correle.mysql
echo ${ASUNTO}' | '${FECHA}>>/tmp/correle.mysql
sendmail ${PARA} < /tmp/correle.mysql
`rm -f /tmp/correle.mysql`