EMailProfiler Service: Neuer Config Schalter InfoTemplateId

App/EmailProfiler.Service/Config.vb

@@ -16,6 +16,12 @@ Public Class Config
     ''' </summary>
     Public Property RejectionTemplateId As Integer = 0
 
+    ''' <summary>
+    ''' GUID des EMail Templates das bei Info-Mails verwendet wird.
+    ''' Siehe Tabelle DD_ECM.dbo.TBDD_EMAIL_TEMPLATE
+    ''' </summary>
+    Public Property InfoTemplateId As Integer = 0
+
     Public Property EmailTestReceiver As String = ""
     Public Property EmailTestHTML As String = ""
 End Class

App/EmailProfiler.Service/MyService.vb

@@ -56,7 +56,7 @@ Public Class MyService
 
                 EmailWorker = New clsWorkEmail(LogConfig, Config.ConnectionString, DBConfig.WindreamConnectionString,
                                                 Config.UseWindream, Config.EmailAccountId, Config.EmailTitlePrefix,
-                                                Config.RejectionTemplateId)
+                                                Config.RejectionTemplateId, Config.InfoTemplateId)
                 Logger.Debug("Module Workmail initialized")
 
                 If Database.DBInitialized = False Then
@@ -104,7 +104,8 @@ Public Class MyService
                                          Config.EmailAccountId,
                                          Config.EmailSenderLimitation,
                                          Config.EmailTitlePrefix,
-                                         Config.RejectionTemplateId)
+                                         Config.RejectionTemplateId,
+                                         Config.InfoTemplateId)
             oWorker.Start_WorkingProfiles()
         Catch ex As Exception
             Logger.Error(ex)