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