diff --git a/EnvelopeGenerator.Service/EnvelopeGenerator.Service.vbproj b/EnvelopeGenerator.Service/EnvelopeGenerator.Service.vbproj index f4d0f95e..59e955a6 100644 --- a/EnvelopeGenerator.Service/EnvelopeGenerator.Service.vbproj +++ b/EnvelopeGenerator.Service/EnvelopeGenerator.Service.vbproj @@ -14,6 +14,8 @@ v4.8 true + + AnyCPU @@ -66,9 +68,8 @@ ..\..\2_DLL Projekte\DDModules\Messaging\bin\Debug\DigitalData.Modules.Messaging.dll - - False - D:\ProgramFiles\GdPicture.NET 14\Redist\GdPicture.NET (.NET Framework 4.5)\GdPicture.NET.14.dll + + ..\packages\GdPicture.14.2.89\lib\net462\GdPicture.NET.14.dll @@ -177,4 +178,11 @@ + + + + Dieses Projekt verweist auf mindestens ein NuGet-Paket, das auf diesem Computer fehlt. Verwenden Sie die Wiederherstellung von NuGet-Paketen, um die fehlenden Dateien herunterzuladen. Weitere Informationen finden Sie unter "http://go.microsoft.com/fwlink/?LinkID=322105". Die fehlende Datei ist "{0}". + + + \ No newline at end of file diff --git a/EnvelopeGenerator.Service/My Project/AssemblyInfo.vb b/EnvelopeGenerator.Service/My Project/AssemblyInfo.vb index 94cf9c00..e2ef66b7 100644 --- a/EnvelopeGenerator.Service/My Project/AssemblyInfo.vb +++ b/EnvelopeGenerator.Service/My Project/AssemblyInfo.vb @@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices ' übernehmen, indem Sie "*" eingeben: ' - - + + diff --git a/EnvelopeGenerator.Service/Scheduler.vb b/EnvelopeGenerator.Service/Scheduler.vb index 98b30906..a6cf19ad 100644 --- a/EnvelopeGenerator.Service/Scheduler.vb +++ b/EnvelopeGenerator.Service/Scheduler.vb @@ -26,47 +26,52 @@ Public Class Scheduler End Sub Public Async Function Start(pInterval As Integer) As Task - Logger.Debug("Starting Scheduler..") + Try + Logger.Debug("Starting Scheduler..") - Dim oProperties As New NameValueCollection() + Dim oProperties As New NameValueCollection() - Scheduler = Await SchedulerBuilder.Create(oProperties). - UseDefaultThreadPool(Sub(x) x.MaxConcurrency = 5). - BuildScheduler() + Scheduler = Await SchedulerBuilder.Create(oProperties). + UseDefaultThreadPool(Sub(x) x.MaxConcurrency = 5). + BuildScheduler() - Dim oJobKey = New JobKey(JobName) - Dim oJobData = New JobDataMap() From { - {Common.Constants.GDPICTURE, LicenseKey}, - {Common.Constants.LOGCONFIG, LogConfig}, - {Common.Constants.DATABASE, ConnectionString}, - {Common.Constants.IGNORED_LABELS, _ignoredLabels} - } + Dim oJobKey = New JobKey(JobName) + Dim oJobData = New JobDataMap() From { + {Common.Constants.GDPICTURE, LicenseKey}, + {Common.Constants.LOGCONFIG, LogConfig}, + {Common.Constants.DATABASE, ConnectionString}, + {Common.Constants.IGNORED_LABELS, _ignoredLabels} + } - Logger.Debug("Initialized Job [{0}]", JobName) + Logger.Debug("Initialized Job [{0}]", JobName) - Dim oJob As IJobDetail = JobBuilder.Create(Of FinalizeDocumentJob). - UsingJobData(oJobData). - WithIdentity(oJobKey). - Build() + Dim oJob As IJobDetail = JobBuilder.Create(Of FinalizeDocumentJob). + UsingJobData(oJobData). + WithIdentity(oJobKey). + Build() - Dim oTrigger As ITrigger = TriggerBuilder.Create(). - ForJob(oJobKey). - WithIdentity($"{JobName}-trigger"). - WithSimpleSchedule(Sub(s) s. - RepeatForever(). - WithIntervalInMinutes(pInterval)). - StartNow(). - Build() + Dim oTrigger As ITrigger = TriggerBuilder.Create(). + ForJob(oJobKey). + WithIdentity($"{JobName}-trigger"). + WithSimpleSchedule(Sub(s) s. + RepeatForever(). + WithIntervalInMinutes(pInterval)). + StartNow(). + Build() - Logger.Debug("Initialized Trigger") + Logger.Debug("Initialized Trigger") - Await Scheduler.ScheduleJob(oJob, oTrigger) + Await Scheduler.ScheduleJob(oJob, oTrigger) - Logger.Debug("Job scheduled.") + Logger.Debug("Job scheduled.") - Await Scheduler.Start() + Await Scheduler.Start() + + Logger.Info("Scheduler started!") + Catch ex As Exception + Logger.Error(ex) + End Try - Logger.Info("Scheduler started!") End Function Public Async Function [Stop]() As Task diff --git a/EnvelopeGenerator.Service/Service.vb b/EnvelopeGenerator.Service/Service.vb index 0d69b896..4989049c 100644 --- a/EnvelopeGenerator.Service/Service.vb +++ b/EnvelopeGenerator.Service/Service.vb @@ -37,13 +37,14 @@ Public Class Service TempFiles.Create() ' === Initialize Databases === - Logger.Info("Inititalize Databases") + Logger.Info("Inititalize Database ...") If Config.ConnectionString = String.Empty Then Throw New ApplicationException("Connection String is empty!") End If Database = New MSSQLServer(LogConfig, Config.ConnectionString) + Logger.Debug("Database initialized") If Database.DBInitialized = False Then Throw New ApplicationException("Database connection could not be established!") diff --git a/EnvelopeGenerator.Service/packages.config b/EnvelopeGenerator.Service/packages.config index 18eb1a41..220017c0 100644 --- a/EnvelopeGenerator.Service/packages.config +++ b/EnvelopeGenerator.Service/packages.config @@ -1,5 +1,7 @@  + +