Creating a ReplicationRoute Object

You create a new ReplicationRoute object by calling the ReplicationServer.AddRoute method, as in the following example, where ReplRoute is the name you give to the new ReplicationRoute object:

Option Explicit 
On Error Resume Next

dim ReplServer
set ReplServer = CreateObject("CrsApi.ReplicationServer")
ReplServer.Initialize("")

dim ReplRoute
set ReplRoute = ReplServer.AddRoute("Default")
...

'Release objects
set ReplRoute  = Nothing
set ReplServer = Nothing