Sub AppStart (Args() As String)
srvr.Initialize("")
Connectors = srvr.CreateThreadSafeMap
Dim dbs As List = Array("database_01", "database_02") 'read from a file
For Each db As String In dbs
Dim con As RDCConnector
con.Initialize(db)
Connectors.Put(db, con)
Next
srvr.Port = 17178
srvr.AddHandler("/test", "TestHandler", False)
srvr.AddHandler("/rdc", "RDCHandler", False)
srvr.Start
Log($"jRDC is running (version = $1.2{VERSION})"$)
StartMessageLoop