ustva, Fakt, Automailversand

This commit is contained in:
2025-04-18 10:04:41 +02:00
parent ec62ef33da
commit df1c0e8eb4
8 changed files with 114 additions and 70 deletions

View File

@@ -106,10 +106,13 @@ Public Class cAutomailversand
End If
'TODO: nach TEST deaktivieren!
If True Then
MailTo = "d.breimaier@verag.ag"
If VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM Then
MailTo = ""
MailtoCC = ""
MailtoBCC = ""
MailtoBCC = "mmdabrechnung@verag.ag"
Else
MailtoBCC = "mmdabrechnung@verag.ag"
End If
@@ -326,7 +329,7 @@ Public Class cAutomailversand
Next
If VERAG_PROG_ALLGEMEIN.cProgramFunctions.sendMail(EMails, EMail_subject, EMail_HTML, "noreply@verag.ag", False, False, EMails_CC, EMails_BCC, attachList) Then
If VERAG_PROG_ALLGEMEIN.cProgramFunctions.sendMail(EMails, EMail_subject, EMail_HTML, "mmdabrechnung@verag.ag", False, False, EMails_CC, EMails_BCC, attachList) Then
API.UPDTAE_OK()
mailcreated = True
Else