Remove ClassDatabase, ClassDataASorDB, replace with DatabaseWithFallback
This commit is contained in:
@@ -55,7 +55,8 @@ Public Class ClassParamRefresh
|
||||
End If
|
||||
Else
|
||||
Dim CON_ID = oMode.Replace("PM.IDB_CONID!", "")
|
||||
Dim oConString = ClassDatabase.Get_ConnectionString(CON_ID)
|
||||
'Dim oConString = ClassDatabase.Get_ConnectionString(CON_ID)
|
||||
Dim oConString = Database_ECM.Get_ConnectionStringforID(CON_ID)
|
||||
|
||||
CONNECTION_STRING_IDB = oConString
|
||||
Database_IDB = New MSSQLServer(LOGCONFIG, CONNECTION_STRING_IDB)
|
||||
|
||||
Reference in New Issue
Block a user