add logfiles per machine

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)