quick fix subject containing single quotes

This commit is contained in:
Jonathan Jenne 2022-11-01 14:53:07 +01:00
parent 7e88092ded
commit 592e424243

View File

@ -827,7 +827,7 @@ Public Class clsWorkEmail
$"('{CURRENT_MAIL_PROCESS_NAME}'," & $"('{CURRENT_MAIL_PROCESS_NAME}'," &
$"'{oMSGID}'," & $"'{oMSGID}'," &
$"'{CURRENT_MAIL_FROM}'," & $"'{CURRENT_MAIL_FROM}'," &
$"'{CURRENT_MAIL_MESSAGE.Subject}'," & $"'{CURRENT_MAIL_MESSAGE.Subject.Replace("'", "''")}'," &
$"'{CURRENT_MAIL_MESSAGE.Date}'," & $"'{CURRENT_MAIL_MESSAGE.Date}'," &
$"'{CURRENT_MAIL_BODY_ALL}'," & $"'{CURRENT_MAIL_BODY_ALL}'," &
$"'{ATTMT1}')" $"'{ATTMT1}')"