change config/log path to startup directory
This commit is contained in:
parent
6b2c0b696b
commit
36937abe4c
@ -4,8 +4,16 @@
|
|||||||
|
|
||||||
Private Sub frmMain_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
Private Sub frmMain_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||||
Try
|
Try
|
||||||
My.Application.LogConfig = New LogConfig(LogPath:=LogConfig.PathType.AppData, CompanyName:="Digital Data", ProductName:="WinLineProductNumberGenerator")
|
My.Application.LogConfig = New LogConfig(
|
||||||
My.Application.ConfigManager = New ConfigManager(Of Config)(My.Application.LogConfig, Application.UserAppDataPath)
|
LogPath:=LogConfig.PathType.CustomPath,
|
||||||
|
CustomLogPath:=Application.StartupPath,
|
||||||
|
CompanyName:="Digital Data",
|
||||||
|
ProductName:="WinLineProductNumberGenerator"
|
||||||
|
)
|
||||||
|
My.Application.ConfigManager = New ConfigManager(Of Config)(
|
||||||
|
My.Application.LogConfig,
|
||||||
|
Application.StartupPath
|
||||||
|
)
|
||||||
_Logger = My.Application.LogConfig.GetLogger()
|
_Logger = My.Application.LogConfig.GetLogger()
|
||||||
Catch ex As Exception
|
Catch ex As Exception
|
||||||
MsgBox("Fehler beim Initialisieren (Logging und Config):" & vbNewLine & ex.Message, MsgBoxStyle.Critical, Text)
|
MsgBox("Fehler beim Initialisieren (Logging und Config):" & vbNewLine & ex.Message, MsgBoxStyle.Critical, Text)
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user