$QUEUE = new tm_Q();
$QUEUE->setHStatus($h_id, 7);
//unsubscribe!
}
$created = date("Y-m-d H:i:s");
//im memo speichern wir den namen des newsletter etc.
$memo = "unsubscribed";
$NEWSLETTER = new tm_NL();
$NL = $NEWSLETTER->getNL($nl_id);
if (count($NL) > 0) {
$memo .= " (" . $NL[0]['subject'] . ")";
}
//set status adresse, set editor...
$author = "unsubscribe";
//always unsubscribe ...
if ($ADDRESS->unsubscribe($ADR[0]['id'], $author)) {
$ADDRESS->setAktiv($ADR[0]['id'], 0);
$ADDRESS->addMemo($ADR[0]['id'], $memo);
//unsubscribed
if ($C[0]['unsubscribe_action'] == "blacklist" || $C[0]['unsubscribe_action'] == "blacklist_delete") {
//add adr to blacklist
if (!$BLACKLIST->isBlacklisted($ADR[0]['email'], "email", 0)) {
//only_active=0, also alle, nicht nur aktive, was default waere
$BLACKLIST->addBL(array("siteid" => TM_SITEID, "expr" => $ADR[0]['email'], "aktiv" => 1, "type" => "email"));
}
}
if ($C[0]['unsubscribe_action'] == "delete" || $C[0]['unsubscribe_action'] == "blacklist_delete") {
$ADDRESS->delAdr($ADR[0]['id']);
}
if ($C[0]['notify_unsubscribe'] == 1) {
//email bei subscrption an admin....
if ($val2 == "delete") {
if (!DEMO) {
$ADDRESS->delAdr($A[0]['id']);
}
$_MAIN_MESSAGE .= "<br>" . sprintf(___("Die Adresse %s wurde gelöscht."), $A[0]['email']);
}
if ($val2 == "error") {
$ADDRESS->setStatus($A[0]['id'], 9);
$_MAIN_MESSAGE .= "<br>" . sprintf(___("Die Adresse %s wurde als Fehlerhaft markiert."), $A[0]['email']);
}
if ($val2 == "aktiv") {
$ADDRESS->setAktiv($A[0]['id'], 0);
$_MAIN_MESSAGE .= "<br>" . sprintf(___("Die Adresse %s wurde deaktiviert."), $A[0]['email']);
}
if ($val2 == "unsubscribe") {
$ADDRESS->unsubscribe($A[0]['id'], "Bounce");
$ADDRESS->setAktiv($A[0]['id'], 0);
$_MAIN_MESSAGE .= "<br>" . sprintf(___("Die Adresse %s wurde abgemeldet und deaktivert."), $A[0]['email']);
}
if ($val2 == "auto") {
$_MAIN_MESSAGE .= "<br>" . $A[0]['email'] . ": ";
//wenn erros noch unter dem limit...
//fehler zaehlen
$ADDRESS->setAError($A[0]['id'], $A[0]['errors'] + 1);
$_MAIN_MESSAGE .= " -- " . sprintf(___("Fehler: %s von max. %s"), $A[0]['errors'] + 1, $C[0]['max_mails_retry']);
//wenn adresse noch nicht abgemeldet!!!!!
if ($A[0]['status'] != 11) {
//wenn erros das limit ueberschritten hat:
if ($A[0]['errors'] + 1 > $C[0]['max_mails_retry']) {
//unsubscribe und deaktivieren
$ADDRESS->setStatus($A[0]['id'], 9);
