Scripting Publications Via RMO

Hi



My first attempt at RMO is to create a job that will generate the SQL scripts necessary to recreate publications on a warm stanby server.



I thought I'd got a grip on the RMO object model, but whenever I call the script method, an empty string is generated.



Can anyone see what I'm doing wrong?



' Create connection to local server

serverConnection = New ServerConnection(".")

Try

' connect to publisher

serverConnection.Connect()

replicationServer = New ReplicationServer(serverConnection)

replicationDatabases = replicationServer.ReplicationDatabases

For Each replicationDatabase In replicationDatabases
If replicationDatabase.HasPublications Then
replicationDatabase.LoadProperties()
Console.WriteLine(replicationDatabase.Script(ScriptOptions.Creation))
End If

Next

Catch ex As Exception

Finally
serverConnection.Disconnect()

End Try