Hallo zusammen,
ich muss eine lokale Notes DB auf mind. 2 Server Replizieren.
Die Server kennen sich nicht untereinander.
Die Repliken auf den beiden Servern habe ich bereits erfolgreich erstellt.
Nur der Abgleich via Replikation geht immer nur mit einem Server.
Nun habe ich in eine Ansicht einen Button erstellt, wie folgt:
Sub Click(Source As Button)
Dim session As New NotesSession
Dim db As NotesDatabase
Set db = session.CurrentDatabase
If db.Replicate( "BERLIN" ) Then
Messagebox "Berlin OK", 1
Else
Messagebox "Berlin FALSE", 1
End If
If db.Replicate( "Sttgt" ) Then
Messagebox "Sttgt. OK", 1
Else
Messagebox "Sttgt. FALSE", 1
End If
End Sub
Super! Den ich erhalt immer je ein OK, obwohl nichts repliziert wird.
Kann jemand helfen?