LOTUSSCRIPT/COM/OLE CLASSES

Examples: DontSendLocalSecurityUpdates property
This agent toggles whether local security updates are sent.

Sub Initialize
 Dim session As New NotesSession
 Dim db As NotesDatabase
 Dim rep As NotesReplication
 Set db = session.CurrentDatabase
 Set rep = db.ReplicationInfo
 If rep.DontSendLocalSecurityUpdates Then
   rep.DontSendLocalSecurityUpdates = False
   Print "Send local security updates"
 Else
   rep.DontSendLocalSecurityUpdates = True
   Print "Don't send local security updates"
 End If
 Call rep.Save()
End Sub

See Also