AppStd/RecordOrganizer
8
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

MS V2.7 .Net Logger etc

Browse Source
This commit is contained in:
SchreiberM
2021-06-15 16:28:55 +02:00
parent e2619eb3ad
commit e796ae91cb
109 changed files with 295499 additions and 8793 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
app/DD-Record-Organizer/frmConfig_Basic.vb
View File

@@ -139,7 +139,7 @@ Public Class frmConfig_Basic
End Try
Me.txtActualConnection.Text = constr
chkLogErrorsOnly.Checked = LogErrorsOnly
chkLogErrorsOnly.Checked = DEBUG
'txtwdSearch_Count.Text = WDResultListCount.ToString
txtTask_Popup.Text = Task_Popup_minutes.ToString
CheckBoxGridDocResult_BestFitColumns.Checked = GridDocResult_BestFitColumns
@@ -181,13 +181,14 @@ Public Class frmConfig_Basic
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Process.Start(ClassLogger.DateiSpeicherort)
Process.Start(LOGCONFIG.LogFile)
End Sub
Private Sub chkLogErrorsOnly_CheckedChanged(sender As Object, e As EventArgs) Handles chkLogErrorsOnly.CheckedChanged
LogErrorsOnly = chkLogErrorsOnly.Checked
SaveMySettingsValue("LogErrorsOnly", LogErrorsOnly, "ConfigMain")
clsCURRENT.LOG_ERRORS_ONLY = LogErrorsOnly
DEBUG = chkLogErrorsOnly.Checked
SaveMySettingsValue("LogErrorsOnly", DEBUG, "ConfigMain")
clsCURRENT.LOG_ERRORS_ONLY = DEBUG
LOGCONFIG.Debug = DEBUG
End Sub
@@ -273,8 +274,8 @@ Public Class frmConfig_Basic
System.IO.Directory.CreateDirectory(mypath)
End If
Catch ex As Exception
ClassLogger.Add(" >> Fehler beim Erstellen des Folderwatchordners: " & mypath, False)
ClassLogger.Add(" >> " & ex.Message, False)
LOGGER.Warn("Fehler beim Erstellen des Folderwatchordners: " & mypath)
LOGGER.Warn("" & ex.Message)
MsgBox("Error in creating Hotfolder: " & mypath & vbNewLine & "Please check the rights!" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
Exit Sub
End Try