From c1fa724d18ba438c2987b9af5de7eb026ef854d0 Mon Sep 17 00:00:00 2001 From: Daniel Covington Date: Mon, 24 Aug 2026 12:33:46 -0400 Subject: [PATCH] CC staff on order-received confirmation email SendOrderDetailsEmail now CCs natascham, erickaw, danielc, and katelyne @kentcommunications.com on the 'order received' email sent to the customer after they submit their order details. --- app/models/OrderMailer.asp | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) diff --git a/app/models/OrderMailer.asp b/app/models/OrderMailer.asp index cd4178f..546389d 100644 --- a/app/models/OrderMailer.asp +++ b/app/models/OrderMailer.asp @@ -35,6 +35,13 @@ Class OrderMailer_Class mail.IsBodyHTML = True mail.Body = BuildOrderDetailsEmailBody(order, model) mail.AddRecipient "To", order("Email") + + Dim ccAddress, ccAddresses + ccAddresses = OrderReceivedCcAddresses() + For Each ccAddress In ccAddresses + mail.AddRecipient "Cc", ccAddress + Next + mail.Send Err.Clear @@ -44,6 +51,15 @@ Class OrderMailer_Class '------------------------------------------------------------------------------------------------------------------- ' Private helpers '------------------------------------------------------------------------------------------------------------------- + ' Staff addresses CC'd on every "order received" confirmation email. + Private Function OrderReceivedCcAddresses() + OrderReceivedCcAddresses = Array( _ + "natascham@kentcommunications.com", _ + "erickaw@kentcommunications.com", _ + "danielc@kentcommunications.com", _ + "katelyne@kentcommunications.com") + End Function + Private Function NewConfiguredMail() Dim smtpPort : smtpPort = GetAppSetting("SmtpPort") If Not IsNumeric(smtpPort) Then smtpPort = 25