16.01.24

EnvelopeGenerator.Common/Helpers.vb

@@ -39,6 +39,11 @@ Public Class Helpers
 
     End Function
 
+    Public Shared Function GetAccessCode() As String
+        Return Guid.NewGuid().ToString("d").Substring(1, 6).ToUpper()
+    End Function
+
+
     Public Shared Function ColorTypeToColor(pColorType As ColorType) As Color
         Select Case pColorType
             Case ColorType.ReceiverColor1

EnvelopeGenerator.Common/Services/TemplateService.vb

@@ -7,16 +7,12 @@ Public Class TemplateService
     Private _replaceDictionary As Dictionary(Of String, String)
 
     Private ReadOnly DbConfig As DbConfig
-    Private ReadOnly LogConfig As LogConfig
-    Private ReadOnly Logger As Logger
     Private ReadOnly EmailHtmlTemplateModel As EmailTemplateModel
 
     Public Sub New(pState As State)
         MyBase.New(pState)
 
         DbConfig = pState.DbConfig
-        LogConfig = pState.LogConfig
-        Logger = LogConfig.GetLogger()
         EmailHtmlTemplateModel = New EmailTemplateModel(pState)
     End Sub