neu

VERAG_PROG_ALLGEMEIN/Classes/cEmailBenachrichtigung.vb

@@ -197,6 +197,17 @@ Public Class cEmailBenachrichtigung
         End Select
     End Function
 
+    Public Shared Function getBCCEmail() As String
+        Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
+            Case "IMEX" : Return "noreply@imex-group.at"
+            Case "ATILLA" : Return "noreply@verag.ag"
+            Case "UNISPED" : Return "No-Reply@unisped.at"
+            Case "FRONTOFFICE" : Return "noreply@front-office.eu"
+            Case "AMBAR" : Return "" '"noreply@verag.ag"
+            Case Else : Return "noreply@verag.ag"
+        End Select
+    End Function
+
     Shared Sub eMails_einlesenOLD(hFrächter_kdnr As String, hAuftraggeber_kdnr As String, art As Integer, ByRef Emails As String, ByRef Emails_CC As String, ByRef Emails_BCC As String, ByRef Emails_list_sent As VERAG_PROG_ALLGEMEIN.cEmailBenachrichtigungList)
         'ART:
         '1=Ankunft