Update attachment filename to fix length and character errors in windream

This commit is contained in:
Jonathan Jenne
2023-07-28 10:21:13 +02:00
parent aa5a268e14
commit 3eebd74549
7 changed files with 140 additions and 84 deletions

View File

@@ -1,10 +1,12 @@
Imports System.ComponentModel
Imports System.Configuration
Imports System.IO
Imports System.Text.RegularExpressions
Imports DigitalData.EMLProfiler
Imports DigitalData.Modules.Database
Imports DigitalData.Modules.Logging
Imports DigitalData.Modules.Messaging
Imports NLog.Config
Public Class frmMain
Private Logger As DigitalData.Modules.Logging.Logger
@@ -170,7 +172,9 @@ Public Class frmMain
End If
Logger.Debug($"SQL-Server ConnString is [{_SQLServerConString}]")
_database = New MSSQLServer(LogConfig, _SQLServerConString)
Logger.Debug("Inititalizing Configuration")
_ConfigManager = New ClassConfig(LogConfig, _database)
_Config = _ConfigManager.GetConfig()
@@ -187,13 +191,14 @@ Public Class frmMain
tslblstatus.Text = "Please add a connection!"
tslblstatus.BackColor = Color.Red
End If
If dbResult = False Then
If _database.DBInitialized = False Then
MsgBox("Error in init database. (Connection failed) More information in the logfile.", MsgBoxStyle.Critical, Text)
Return False
Else
Return True
End If
Catch ex As Exception
Logger.Error(ex)
MsgBox(ex.Message, MsgBoxStyle.Critical, "Error in Init Database:")
Return False
End Try