weible98 wird zur Empfänger-Email ergänzt */ function SendMail ($a_sRecipient, $a_sTopic, $a_sContent, $a_sSenderName, $a_sSenderEmail) { $sRecipient = GetContactEmail ($a_sRecipient); //$sRecipient = $a_sRecipient . AT . DOMAIN_NAME; // check parameter if (!CheckInput ($a_sTopic, 'text')) { return 'Es wurde kein Betreff angegeben.'; } if (!CheckInput ($a_sContent, 'text')) { return 'Es wurde kein Inhalt angegeben.'; } if (!CheckInput ($a_sSenderEmail, 'email')) { return 'Email-Adresse des Absenders fehlt oder ist ungültig.'; } // generate content $sSender = '"'.$a_sSenderName.'" <'.$a_sSenderEmail.'>'; $sTitle = DOMAIN_NAME . ': '.$a_sTopic; $sTitleAdmin = DOMAIN_NAME . ' (Kopie): '.$a_sTopic; $sHeader = 'MIME-Version: 1.0' . "\r\n" . 'Content-type: text/plain; charset=UTF-8'. "\r\n" . 'from:'. $sSender; $sContent = MAIL_NEW_LINE . "Nachricht von ". DOMAIN_NAME ." gesendet am ".date("Y-m-d")." um ".date("H:i:s")." Uhr:" . MAIL_NEW_LINE; $sContent .= MAIL_SEP_LINE . MAIL_NEW_LINE . MAIL_NEW_LINE; $sContent .= $a_sContent; $sContent .= MAIL_NEW_LINE . MAIL_NEW_LINE . MAIL_SEP_LINE . MAIL_NEW_LINE; // send mail if ((false == strpos ("__" . $sRecipient, "ralf")) && (false == strpos ("__" . $sRecipient, "vorstand")) && (false == strpos ("__" . $sRecipient, "info"))) { @mail (EmailDecode (MAIL_ADMIN), '=?UTF-8?B?'.base64_encode($sTitleAdmin).'?=', $sContent, $sHeader); } @mail ($sRecipient, '=?UTF-8?B?'.base64_encode($sTitle).'?=', $sContent, $sHeader) or die ('Es ist ein Fehler beim Versenden der Nachricht aufgetreten.'); //@mail (EmailDecode (MAIL_BOSS), '=?UTF-8?B?'.base64_encode($sTitleAdmin).'?=', $sContent, $sHeader); return ''; } /* Funktion: Infomail schicken Aufruf: SendInfoMail ("Seitentitel", "Inhalt"); */ function SendInfoMail ($sTopic, $sContent) { $sSender = '"'.DOMAIN_NAME.' Admin" <'. EmailDecode (MAIL_ADMIN) .'>'; $sTitle = DOMAIN_NAME .": ".$sTopic; if ((ereg (".txt$", strtolower ($sContent))) && (file_exists ($sContent))) { if (NULL != ($sLines = @file ($sContent))) { $sContent = ""; foreach ($sLines as $sLineNum => $sLine) { $sContent .= $sLine . "\n"; } } } @mail (EmailDecode (MAIL_ADMIN), $sTitle, $sContent, "from:$sSender"); } /* Funktion: String überprüfen, ob fehlaweb.de oder nz-immenried.de enthalten ist (wichtig bei Absender-Adressen) Aufruf: CheckDomain("stefan.simmler@cs-baugeraete.de"); */ function CheckDomain($a_sValue) { $tPosDomain = strpos ($a_sValue, DOMAIN_NAME); if (false == $tPosDomain) { return false; } return true; } /* Funktion: Email-Adresse unleserlich für Spam-Bots machen. Aufruf: EmailEncode("test@asdf.com"); Ergebnis: "etstasdf.com4" */ function EmailEncode($a_sEmail) { // Erste beiden Zeichen der Email-Adresse werden vertauscht, das @ wird entfernt und die Position des @ wird angehängt. $asEmail = explode ("@", $a_sEmail); $iPosAt = strpos ($a_sEmail, "@"); $sPos1 = $asEmail[0][0]; $asEmail[0][0] = $asEmail[0][1]; $asEmail[0][1] = $sPos1; return $asEmail[0] . $asEmail[1] . $iPosAt; } /* Funktion: Email-Adresse wieder leserlich machen. Aufruf: EmailDecode("etstasdf.com4"); Ergebnis: "test@asdf.com" */ function EmailDecode($a_sEmailKrypted) { $sEmail = $a_sEmailKrypted; $sPos1 = $sEmail[0]; $sEmail[0] = $sEmail[1]; $sEmail[1] = $sPos1; // testasdf.com4 // Ziffer ermitteln $sLast = substr ($sEmail, -3); $iNumeric = 3; if (!is_numeric ($sLast)) { $iNumeric = 2; $sLast = substr ($sEmail, -2); if (!is_numeric ($sLast)) { $iNumeric = 1; $sLast = substr ($sEmail, -1); } } $sReturn = substr ($sEmail, 0, $sLast) . "@" . substr ($sEmail, $sLast, strlen($sEmail) - $sLast - $iNumeric); return $sReturn; } ?> Startseite :: Musikverein Tannheim e.V.