MS

EnvelopeGenerator.Service/Service.vb

@@ -14,7 +14,7 @@ Public Class Service
     Private ConfigManager As ConfigManager(Of Config)
     Private Config As Config
     Private Database As MSSQLServer
-
+    Private TempFiles As TempFiles
     Private Scheduler As Scheduler
 
     Protected Overrides Async Sub OnStart(ByVal args() As String)
@@ -33,9 +33,10 @@ Public Class Service
             Logger.Info($"DEBUG = {LogConfig.Debug}")
 
             Logger.Info("Starting [{0}]", ServiceName)
+            TempFiles = New TempFiles(LogConfig)
+            TempFiles.Create()
 
             ' === Initialize Databases ===
-
             Logger.Info("Inititalize Databases")
 
             If Config.ConnectionString = String.Empty Then
@@ -72,6 +73,7 @@ Public Class Service
         Try
             Logger.Info("Stopping [{0}] !", ServiceName)
             Await Scheduler.Stop()
+            TempFiles.CleanUp()
             Logger.Info("Stopped [{0}] !", ServiceName)
         Catch ex As Exception
             Logger.Error(ex)