Überprüft, ob die Datenbankspiegelung synchronisiert wird.
Knowledge Base article:
Zusammenfassung
Dieser Monitor überprüft den von Microsoft® SQL Server™ gemeldeten Status der Datenbankspiegelungssitzung. Dazu wird eine Abfrage für die master-Datenbank der SQL Server-Instanz ausgeführt und der Status der Datenbankspiegelungssitzung zurückgegeben. Wenn Sie eine Warnung von diesem Monitor erhalten, ist eine Handlung erforderlich, um die Datenbankspiegelungssitzung wieder in einen funktionsfähigen Zustand zu versetzen.
Ursachen
Der fehlerhafte Zustand weist darauf hin, dass die SQL Server™-Datenbankspiegelungssitzung sich nicht in einem funktionsfähigen Zustand befindet. Die möglichen Zustandsangaben werden unten genauer beschrieben:
Status der Spiegelungspartner
Beschreibung
MOM Integritätsstatus
IN_SYNC
Dies ist der normale Betriebszustand. Spiegelungspartner sind synchronisiert und die Spiegelung wird normal ausgeführt.
FEHLERFREI
OUT_OF_SYNC
Spiegelungspartner sind nicht synchronisiert.
KRITISCH
Lösungen
Versuchen Sie Folgendes, um das Problem zu lösen:
Stellen Sie sicher, dass die Spiegelungskonfiguration abgeschlossen ist und der Spiegelungsprozess ausgeführt wird.
Überprüfen Sie die physische Verbindung zwischen den Spiegelungspartnern.
Konfigurieren Sie Firewallregeln für beide Spiegelungspartner entsprechend der Endpunktkonfiguration.
Überschreibbare Parameter
Name
Beschreibung
Standardwert
Intervall (Sekunden)
Das periodische Intervall in Sekunden, in dem der Workflow ausgeführt werden soll.
900
Synchronisierungszeit
Die in einem 24-Stunden-Format angegebene Synchronisierungszeit. Kann ausgelassen werden.
Timeout (Sekunden)
Gibt die Zeit an, die der Workflow ausgeführt werden darf, bevor er geschlossen und als fehlgeschlagen markiert wird.
300
Aktiviert
Aktiviert oder deaktiviert den Workflow.
Ja
Generiert Warnungen
Definiert, ob der Workflow eine Warnung generiert.
Dim GetPartnersStatusQuery
GetPartnersStatusQuery = "SELECT " &_
" mirroring_guid, " &_
" partner_sync_state_desc " &_
" FROM sys.database_mirroring_witnesses "
Call GetPartnersStatus()
Sub GetPartnersStatus()
If WScript.Arguments.Count = 4 Then
Dim oBag
Set oBag = oAPI.CreatePropertyBag()
Dim state, serviceName
serviceName = GetSQLServiceName(WScript.Arguments(2))
state = GetServiceState(WScript.Arguments(1), serviceName)
if (state <> "Running") And (state <> "Unknown") Then
Call oAPI.Return(oBag)
WScript.Quit()
End If
Dim nResult
nResult = PartnersStatus(WScript.Arguments(0), oBag, WScript.Arguments(1), WScript.Arguments(2), WScript.Arguments(3))
Call oAPI.Return(oBag)
On Error Resume Next
Call GlobalErrorListToEventLog()
Else
On Error Resume Next
Call GlobalErrorListToEventLog()
Wscript.Quit()
End If
End Sub
Function PartnersStatus(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
PartnersStatus = 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(GetPartnersStatusQuery)
e.Save
On Error Goto 0
If e.Number <> 0 Then
PartnersStatus = 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), CStr(oResults(1)))
oResults.MoveNext
Loop
Home
DEU