From 73328b67fcce1ac7610ea21b2c89aa56cf34df04 Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Wed, 23 Sep 2020 10:21:13 +0200 Subject: [PATCH] add logfiles per machine --- WinLineArtikelnummerGenerator/frmMain.vb | 3 +++ 1 file changed, 3 insertions(+) diff --git a/WinLineArtikelnummerGenerator/frmMain.vb b/WinLineArtikelnummerGenerator/frmMain.vb index 52b23e7..71c6f2b 100644 --- a/WinLineArtikelnummerGenerator/frmMain.vb +++ b/WinLineArtikelnummerGenerator/frmMain.vb @@ -5,6 +5,7 @@ Private Sub frmMain_Load(sender As Object, e As EventArgs) Handles MyBase.Load Try My.Application.LogConfig = New LogConfig( + Suffix:=Environment.MachineName, LogPath:=LogConfig.PathType.CustomPath, CustomLogPath:=Application.StartupPath, CompanyName:="Digital Data", @@ -52,6 +53,8 @@ Dim oVendors = My.Application.Winline.GetVendors() listboxVendors.DataSource = oVendors + + _Logger.Info("Application started from Machine {0}", Environment.MachineName) Catch ex As Exception MsgBox("Fehler beim Initialisieren (Datenbank):" & vbNewLine & ex.Message, MsgBoxStyle.Critical, Text) _Logger.Error(ex)