Delete Email Tempfiles at successful indexing and at program end

Global_Indexer/frmIndex.vb

@@ -2740,7 +2740,7 @@ Public Class frmIndex
                             MsgBox("All files were successfully processed through Multiindexing", MsgBoxStyle.Information, "Success")
                         End If
 
-                        'DTACTUAL_FILES.Clear()
+                        EMAIL.Clear_TempFiles()
 
                         DocumentViewer1.CloseDocument()
                         DocumentViewer1.Done()

Global_Indexer/frmStart.vb

@@ -254,6 +254,8 @@ Public Class frmStart
             MsgBox("Unexpected Error in Closing Application: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
         End Try
 
+        EMAIL.Clear_TempFiles()
+
         'TempDateien löschen
         For Each oFile In TEMP_FILES
             Try