diff --git a/App/DigitalData.EMLProfiler/clsWorkEmail.vb b/App/DigitalData.EMLProfiler/clsWorkEmail.vb
index 54b500a..82c29b8 100644
--- a/App/DigitalData.EMLProfiler/clsWorkEmail.vb
+++ b/App/DigitalData.EMLProfiler/clsWorkEmail.vb
@@ -738,7 +738,7 @@ Public Class clsWorkEmail
         If MessageError = False Then
             Dim ins = $"INSERT INTO TBEMLP_HISTORY (WORK_PROCESS,EMAIL_MSGID,EMAIL_SUBJECT,EMAIL_DATE,EMAIL_BODY,EMAIL_SUBSTRING1,EMAIL_SUBSTRING2,EMAIL_FROM,PROFILE_ID) VALUES " &
       $"('{CURRENT_MAIL_PROCESS_NAME}'," &
-      $"'{CURRENT_MAIL_MESSAGE.MessageID.Replace("<", "").Replace(">", "")}'," &
+      $"'{CURRENT_MAIL_MESSAGE_ID}'," &
       $"'{CURRENT_MAIL_SUBJECT}'," &
       $"'{CURRENT_MAIL_MESSAGE.Date}'," &
       $"'{CURRENT_MAIL_BODY_ALL}'," &