MS

App/DigitalData.EMLProfiler/clsWorkEmail.vb

@@ -285,6 +285,13 @@ Public Class clsWorkEmail
 
                     Dim cleanPath As String = String.Join("", oTempFilename.Split(Path.GetInvalidPathChars()))
                     If System.IO.File.Exists(cleanPath) = False Then
+                        Try
+                            File.Delete(cleanPath)
+                        Catch ex As Exception
+                            Logger.Error(ex)
+                            Return False
+                        End Try
+
                         CURRENT_MAIL_MESSAGE.Save(cleanPath, True)
                         Dim oFileInfo As New FileInfo(cleanPath)
                         Dim oFileLenth As Long = oFileInfo.Length