Event "vor Email-Versand"

Der Event wird unmittelbar vor dem Versand einer Email aufgerufen. Dem Event wird ein Array mit Empfänger-Typen, -Arten, -Emailadressen und Betreffs übergeben, welches im Event verändert werden kann. Auf diese Weise ist es z.B. möglich Kunden-Emails, die als Kopie an interne Mitarbeiter gehen, den Kunden-Matchcode voran zu stellen. Dieses Event steht zunächst nur bei Versand via SMTP zur Verfügung!
siehe auch Event "Memo - vor dem Setzen der internen Notiz"

Beispiel

CODE

| nEvtNo:P1, aInfo:P2, aText:P3, aNote:P4, oBatchMail:P5, i |

// Aufruf erfolgt vor dem Versenden jeder Email
// ACHTUNG: Änderungen an Email-Adressen haben keine(!) Auswirkungen auf den
//          Header der Email !
// aInfo = { { <Type>, <IntExt>, <Emailadresse>, <Betreff> }, {...}, ... }
// Type   : "TO", "CC", "BCC"
// IntExt : "EXT"ern, "INT"ern
// Betreff, Emailadresse und IntExt können geändert werden
// Änderungen an Type, aText, aNote wedern ignoriert
// Für Änderungen an aNote steht der Event "Memo - vor dem Setzen der internen Notiz" zur Verfügung
// Array-Elemente können hinzugefügt/gelöscht werden

for i := 1 to ALen(aInfo) do
   if aInfo[i, 1] = "CC" then
      aInfo[i, 4] := "KOPIE: " + aInfo[i, 4],
   endif,
   if aInfo[i, 2] = "INT" then
      aInfo[i, 4] := "INTERN: " + aInfo[i, 4],
   endif,
   if "DONTENWILL" $ Upper(aInfo[i, 3]) then
      aInfo[i, 4] := "DOWI: " + aInfo[i, 4],
   endif,
next,

aInfo // Rückgabe des neuen Arrays