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

See Also

Disabled property

Glossary