This commit is contained in:
SchreiberM 2022-01-18 16:21:11 +01:00
parent 6e09662fc3
commit 71ea8dc2a1
2 changed files with 3 additions and 13 deletions

View File

@ -191,19 +191,6 @@ Public Class ClassInit
' If there is no client, it will fall back to the db by itself
Database = New DatabaseWithFallback(LOGCONFIG, _Client, Database_ECM, Database_IDB)
'If CONNECTION_STRING_APP_SERVER <> String.Empty Then
' Database_APPSERVER = New MSSQLServer(LOGCONFIG, CONNECTION_STRING_APP_SERVER)
' If Database_APPSERVER.DBInitialized = False Then
' MsgBox("ApplicationServer can not be reached! Check Your configuration.", MsgBoxStyle.Information)
' If dbResult = True Then
' CONNECTION_STRING_READ = CONNECTION_STRING_ECM
' End If
' End If
'End If
If dbResult = False Then
ERROR_STATE = "FAILED DBCONNECTION"
MsgBox("Error in init database. (Connection failed) More information in the logfile.", MsgBoxStyle.Critical)
@ -330,6 +317,8 @@ Public Class ClassInit
USERCOUNT_LOGGED_IN = DT_CHECKUSER_MODULE.Rows(0).Item("USERCOUNT_LOGGED_IN")
ClassParamRefresh.Refresh_Params(DT_CHECKUSER_MODULE)
FINALINDICES = New ClassFinalIndex()
FINALINDICES.init()
If IDB_ACTIVE = True Then

View File

@ -63,6 +63,7 @@ Public Class ClassParamRefresh
If Database_IDB.DBInitialized = True Then
IDB_ACTIVE = True
LOGGER.Info($"IDB is active - IDB-Connection [{CON_ID}]!")
Database.InitializeIDB(Database_IDB)
Else
IDB_ACTIVE = False
End If