EmailService: Big update

Services.EmailService/EmailService.Designer.vb

@@ -1,11 +1,11 @@
 Imports System.ServiceProcess
 
-<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
 Partial Class EmailService
     Inherits System.ServiceProcess.ServiceBase
 
     'UserService überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
-    <System.Diagnostics.DebuggerNonUserCode()> _
+    <System.Diagnostics.DebuggerNonUserCode()>
     Protected Overrides Sub Dispose(ByVal disposing As Boolean)
         Try
             If disposing AndAlso components IsNot Nothing Then
@@ -17,8 +17,8 @@ Partial Class EmailService
     End Sub
 
     ' Der Haupteinstiegspunkt für den Prozess
-    <MTAThread()> _
-    <System.Diagnostics.DebuggerNonUserCode()> _
+    <MTAThread()>
+    <System.Diagnostics.DebuggerNonUserCode()>
     Shared Sub Main()
         Dim ServicesToRun() As System.ServiceProcess.ServiceBase
 
@@ -39,7 +39,7 @@ Partial Class EmailService
     ' Hinweis: Die folgende Prozedur ist für den Komponenten-Designer erforderlich.
     ' Das Bearbeiten ist mit dem Komponenten-Designer möglich.  
     ' Das Bearbeiten mit dem Code-Editor ist nicht möglich.
-    <System.Diagnostics.DebuggerStepThrough()> _
+    <System.Diagnostics.DebuggerStepThrough()>
     Private Sub InitializeComponent()
         components = New System.ComponentModel.Container()
         Me.ServiceName = "Service1"