Clean up

App/EmailProfiler.Service/MyService.vb

@@ -109,10 +109,9 @@ Public Class MyService
         End Try
     End Sub
     Protected Overrides Sub OnStop()
-        ' Hier Code zum Ausführen erforderlicher Löschvorgänge zum Beenden des Dienstes einfügen.
         Logger.Info("## Service was stopped manually. ##")
     End Sub
-    Private Sub Worker_Completed(ByVal sender As Object, ByVal e As System.ComponentModel.RunWorkerCompletedEventArgs) 'Handles threadDateiimport.RunWorkerCompleted
+    Private Sub Worker_Completed(sender As Object, e As RunWorkerCompletedEventArgs)
         'This event fires when the DoWork event completes
         Try
             Dim result As String = ""