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`
Anuncios