例: Reset method

次のスクリプトは、データベースを複製して、複製プロパティを最後に保存された値にリセットします。

Dim session As New NotesSession
Dim db As NotesDatabase
Dim rep As NotesReplication
Set db = session.CurrentDatabase
Set rep = db.ReplicationInfo
Call db.Replicate("Xanadu")
Call rep.Reset()
Call rep.Save()