Este monitor comprueba si el testigo del reflejo de la base de datos es accesible.
Knowledge Base article:
Resumen
Este monitor comprueba el estado del testigo del reflejo de la base de datos devuelto por Microsoft® SQL Server™. Esto se hace ejecutando una consulta en la base de datos maestra de la instancia de SQL Server y devolviendo el estado del testigo del reflejo de la base de datos. Si recibe una alerta de este monitor, se requiere la intervención del usuario para devolver el testigo de la creación de reflejo de la base de datos a un estado operativo.
Causas
Una indicación de estado incorrecto muestra que el testigo de la creación de reflejo de la base de datos de SQL Server™ no está disponible actualmente. Todos los estados excepto CONECTADO y SIN TESTIGO producirán un estado incorrecto. A continuación, se indican los posibles estados:
Estado del testigo de la creación de reflejo
Descripción
Estado de mantenimiento de MOM
CONNECTED
Es el estado operativo normal. El asociado de creación de reflejo puede tener acceso al servidor testigo.
VERDE
SIN TESTIGO
Este estado indica que no hay ningún testigo especificado para la sesión de creación de reflejo. Es el estado operativo normal en el modo de alto rendimiento y en el modo de alta seguridad sin conmutación por error automática.
VERDE
UNKNOWN
Hay algunos problemas con la conexión entre el asociado de creación de reflejo y el servidor testigo.
AMARILLO
DISCONNECTED
No hay conexión entre el asociado de creación de reflejo y el servidor testigo.
ROJO
Soluciones
Para solucionar el problema, pruebe lo siguiente:
Asegúrese de que la configuración de la creación de reflejo se haya completado y el proceso de creación de reflejo esté ejecutándose.
Compruebe el vínculo físico entre el asociado de creación de reflejo y el servidor testigo.
Configure las reglas de firewall en ambos servidores conforme a la configuración de los extremos.
Dim GetWitnessStatusQuery
GetWitnessStatusQuery = "SELECT " &_
" d.name, " &_
" CASE WHEN dm.mirroring_witness_name = '' THEN 'NO-WITNESS' ELSE ISNULL(dm.mirroring_witness_state_desc, 'UNKNOWN') END " &_
" FROM sys.databases d " &_
" INNER JOIN sys.database_mirroring dm ON dm.database_id = d.database_id " &_
" WHERE dm.mirroring_guid IS NOT NULL"
Call GetWitnessAccessibility()
Sub GetWitnessAccessibility()
If WScript.Arguments.Count = 4 Then
Dim oBag
Set oBag = oAPI.CreatePropertyBag()
Dim nResult
nResult = WitnessAccessibility(WScript.Arguments(0), oBag, WScript.Arguments(1), WScript.Arguments(2), WScript.Arguments(3))
Call oAPI.Return(oBag)
Else
Wscript.Quit()
End If
End Sub
Function WitnessAccessibility(ByVal sSQLConnectionString, ByRef oBag, ByVal sComputerName, ByVal sInstanceName, ByVal sTcpPort)
Dim e
Set e = New Error
Dim cnADOConnection
Set cnADOConnection = SmartConnectWithoutSQLADODB(sSQLConnectionString, sTcpPort, sComputerName, sInstanceName, "master")
if cnADOConnection Is Nothing Then
WitnessAccessibility = SQL_MONITORING_CONNECT_FAILURE
ThrowScriptErrorNoAbort "Cannot connect to '" & sSQLConnectionString & "' SQL Server", e
Exit Function
End If
Dim oResults
e.Clear
On Error Resume Next
Set oResults = cnADOConnection.Execute(GetWitnessStatusQuery)
e.Save
On Error Goto 0
If e.Number <> 0 Then
WitnessAccessibility = SQL_MONITORING_QUERY_FAILURE
ThrowScriptErrorNoAbort "Query execution failed for '" & sSQLConnectionString & "' SQL Server", e
If (oResults <> null) Then oResults.Close
cnADOConnection.Close
Exit Function
End If
Do While Not oResults.EOF
Call oBag.AddValue(oResults(0) & "-State", CStr(oResults(1)))
oResults.MoveNext
Loop
Home
ESN