I have 2 problems.
- According to designer help:
“CreateReplica creates an uninitialized replica of an existing database. The replica must be initialized either by you with the Replicate method or by the user accessing it from the Notes workspace upon first use.”
However, when I use db.CreateReplica, the replica is created immediately & fully as opposed to being created in an uninitialized state.
- When I change replication Settings through the the NotesReplicationEntry class they never get saved (I do call the save method). I use the following code. It always returns “Replication Entry not found:” no matter what.
REM ------------------------------------------
Dim sess As New notessession
Dim db As NotesDatabase
Dim repl As NotesReplication
Dim reple As NotesReplicationEntry
Dim msg As String
Dim crlf As String
crlf=Chr(10) & Chr(13)
Set db = sess.CurrentDatabase
Set repl=db.ReplicationInfo
Set reple=repl.GetEntry(“Server1”,“Server2”,True)
reple.IsIncludeACL=True
reple.IsIncludeDocuments=False
repl.Disabled=False
repl.Save
Set reple=Nothing
Set repl=Nothing
Set repl=db.ReplicationInfo
Set reple=repl.GetEntry(“Server1”,“Server2”,False)
If reple Is Nothing Then
msg = "Replication Entry not found:" & crlf
msg=msg & " IsIncludeACL=n/a" & crlf
msg=msg & " IsIncludeDocuments=n/a" & crlf
Else
msg = "Replication Entry found:" & crlf
msg=msg & " IsIncludeACL=" & reple.IsIncludeACL & crlf
msg=msg & " IsIncludeDocuments=" & reple.IsIncludeDocuments & crlf
End If
MsgBox msg
REM ------------------------------------------