UseAppConfig integriert wie in taskFLOW

This commit is contained in:
Developer01
2025-06-05 14:09:27 +02:00
parent c6d49b988b
commit e2f8607592
4 changed files with 26 additions and 4 deletions

View File

@@ -25,8 +25,13 @@ Public Class ClassInit
Dim oUtils = New ConfigUtils(LOGCONFIG)
oUtils.MigrateUserAppDataConfig(Application.UserAppDataPath, Application.ProductName, "fileFLOW")
oUtils.MigrateCommonAppDataConfig(Application.CommonAppDataPath, Application.ProductName, "fileFLOW")
CONFIG = New ConfigManager(Of ClassConfig)(LOGCONFIG, Application.UserAppDataPath, Application.CommonAppDataPath, Application.StartupPath)
Dim oCommonAppDataPath = Application.CommonAppDataPath
Dim oStartupPath = Application.StartupPath
If My.Settings.UseAppConfig = True Then
LOGGER.Info("Achtung: Anstatt ComputerConfig wird AppConfig benutzt! (UseAppConfig in Appdata)")
oCommonAppDataPath = oStartupPath
End If
CONFIG = New ConfigManager(Of ClassConfig)(LOGCONFIG, Application.UserAppDataPath, oCommonAppDataPath, Application.StartupPath)
LOGCONFIG.Debug = CONFIG.Config.LogDEBUG
LOGGER.Info("Debug log set to: [{0}]", LOGCONFIG.Debug)