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

ms

Browse Source
This commit is contained in:
SchreiberM
2020-08-10 17:28:32 +02:00
parent fbb4d8ad2e
commit d49e627f5d
89 changed files with 1832 additions and 1250 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
App/DigitalData.EMLProfiler/clsDatabase.vb
View File

@@ -21,7 +21,6 @@ Public Class clsDatabase
DTCONFIG = Return_Datatable("select * from TBEMLP_CONFIG")
If Not IsNothing(DTCONFIG) Then
If DTCONFIG.Rows.Count = 1 Then
LOG_ERRORS_ONLY = DTCONFIG.Rows(0).Item("LOG_ERRORS_ONLY")
PATH_TEMP = DTCONFIG.Rows(0).Item("PATH_EMAIL_TEMP")
PATH_ERROR = DTCONFIG.Rows(0).Item("PATH_EMAIL_ERRORS")
MAIL_BODY_FONT = DTCONFIG.Rows(0).Item("FONT_BODY")
@@ -29,7 +28,6 @@ Public Class clsDatabase
TIMER_INTERVALL = DTCONFIG.Rows(0).Item("CHECK_INTERVALL_MINUTES")
End If
End If
MyLogger.Debug = Not LOG_ERRORS_ONLY
DT_ECM_BASE_CONFIG = Return_Datatable("select * from TBDD_BASECONFIG")
Try
WM_DRIVE = DT_ECM_BASE_CONFIG.Rows(0).Item("WM_DRIVE")