Examples: Priority property

This script checks the replication priority and if it is set to Medium the script changes the priority to Low. In order to save the change, Call Save() is used.

Dim session As New NotesSession
Dim db As NotesDatabase
Dim rep As NotesReplication
Set db = session.CurrentDatabase
Set rep = db.ReplicationInfo
If rep.Priority = DB_REPLICATION_PRIORITY_MED Then
  rep.Priority = DB_REPLICATION_PRIORITY_LOW
End If
Call rep.Save()