// +-------------------------------------------------------------------------+ // + PHP Newsletter V 1.0 von Michael Müller (m-mueller@arcor.de) + // + http://www.netz2k.de - Das Portal rund um PHP Scripte + // + Powered by Netz2K am Ende des Scriptes darf nicht entfernt werden! + // +-------------------------------------------------------------------------+ error_reporting(0); if (!$_POST){print_form();die();} ?>
Wersegrill Newsletter$email=$_POST["email"]; $email=strtolower($email); check_email ($email, "Fehler: Die Email Adresse ist unzutreffend."); $action=$_POST["action"]; $file = "daten.txt"; if (file_exists($file)){ $file_content=file_get_contents($file); }else{ $cf = fopen($file, "w") or die("Fehler: Die Datei existiert nicht.Bitte überprüfen Sie die Einstellungen im Script."); fputs($cf, "Mitglieder der Mailingliste\n"); fclose($cf); } if ($action=="subc"){ if(strpos($file_content,"<$email>")>0){die("Fehler: Die angegebene Email Adresse ist bereits im Newsletter enthalten");} $cf = fopen($file, "a"); fputs($cf, "\n<$email>"); fclose($cf); print "Ihre Email Adresse wurde in den Newsletter eingetragen. Vielen Dank für Ihren Besuch."; } if ($action=="unsubc"){ if(strpos($file_content,"<$email>")==0){die("Fehler: Ihre Email Adresse ist nicht im Newsletter enthalten");} $file_content=preg_replace ("/\n<$email>/","",$file_content); $cf = fopen($file, "w"); fputs($cf, $file_content); fclose($cf); print "Ihre Email Adresse wurde aus dem Newsletter entfernt. "; } ?> function check_email ($email, $message){ if ($email==""){die($message);} $test1=strpos($email, "@"); $test2=strpos(substr($email,strpos($email,"@")), "."); $test3=strlen($email); $test4=substr_count ($email,"@"); if ($test1<2 or $test2<2 or $test3<7 or $test4!=1){die($message);} $email_server=substr($email,strpos($email, "@")+1); if (checkdnsrr($email_server)!=1){die ($message);} } function print_form(){ ?>
|