DEMO

Mit diesem Skript können Besucher ihrer Seite eine Email an ihre Freunde schreiben um die Seite Weiterzuempfehlen.

<?

#Ein Script von David Ruf http://www.rufnet.de 2000
#################################################

//variabeln
$betreff="Einladung zum Klassenklatsch...";
$text="Hier können Sie den Text der Mail bestimmen. Achten Sie darauf keine Anführungszeichen zu verwenden, und benutzen sie keinen Strichpunkt.

--Kommentar des Versenders:------------
$kommentar
---------------------------------------

Diese mail wurde Dir von $from geschickt.
http://www.klassenklatsch.de
admin@klassenklatsch.de";

//ende-hier nichts mehr ändern!

IF ($action==""):

?>
<font size="2" face="Verdana, Arial, Helvetica, sans-serif">Lade deine Freunde
ein!<br>
Schreib einfach die E-mail Adressen in das Formular. Es reicht auch wenn du nur
eine Email angibst, deine absender email musst du aber auf jedenfall angeben!</font>
<form name="form1" method="post" action="">
<p> 1
<input type="text" name="a">
<br>
2
<input type="text" name="b">
<br>
3
<input type="text" name="c">
<br>
4
<input type="text" name="d">
<br>
5
<input type="text" name="e">
<br>
<font face="Verdana, Arial, Helvetica, sans-serif"><b><font size="2">Deine
Email_</font></b></font><br>
<input type="text" name="from">
<br>
<font face="Verdana, Arial, Helvetica, sans-serif"><b><font size="2">Dein
Kommentar_ </font></b></font><br>
<textarea name="kommentar" cols="30" rows="5"></textarea>
<br>
<input type="submit" name="action" value="Send">
<input type="reset" name="Löschen" value="Reset">
</p>
<br>
<font size="2" face="Verdana, Arial, Helvetica, sans-serif"><b><font size="1">Hinweis:</font></b><font size="1">
Name und Adresse werden nicht an dritte weitergegeben. </font></font>
</form>
<?
ELSEIF ($a!=""):
//teste den Absender
if
(!eregi("^[_a-z0-9-]+(\.[_a-z0-9-]+)*@[a-z0-9-]+(\.[a-z0-9-]+)*$", $from))
{
echo "Du must <b>deine</b> Adresse Angeben! ";
$falsch = 1;
}

//teste den ersten empfänger
if
(!eregi("^[_a-z0-9-]+(\.[_a-z0-9-]+)*@[a-z0-9-]+(\.[a-z0-9-]+)*$", $a))
{
echo " <br><b>Keine</b> gültige Email. <b>Eine Adresse </b>musst du aber schon angeben ";
$empf= 1;
}
//erste mail an a
if ($falsch!=1 && $empf!=1)
{
mail("$a","$betreff","$text","FROM:$from");
echo " Deine Einladung wurde an $a verschickt.<br>
<b>Vielen Dank!</b>";
}
//teste den zweiten empfänger
if
(!eregi("^[_a-z0-9-]+(\.[_a-z0-9-]+)*@[a-z0-9-]+(\.[a-z0-9-]+)*$", $b))
{
$empf= 1;
}
//zwiete mail an b
if ($falsch!=1 && $empf!=1)
{
mail("$b","$betreff","$text","FROM:$from");
echo " <br>Außerdem an:<br> $b";
}
//teste den dritten empfänger
if
(!eregi("^[_a-z0-9-]+(\.[_a-z0-9-]+)*@[a-z0-9-]+(\.[a-z0-9-]+)*$", $c))
{
$empf= 1;
}
//dritte mail an c
if ($falsch!=1 && $empf!=1)
{
mail("$c","$betreff","$text","FROM:$from");
echo " <br> $c";
}

//teste den vierten empfänger
if
(!eregi("^[_a-z0-9-]+(\.[_a-z0-9-]+)*@[a-z0-9-]+(\.[a-z0-9-]+)*$", $d))
{
$empf= 1;
}
//vierte mail an d
if ($falsch!=1 && $empf!=1)
{
mail("$d","$betreff","$text","FROM:$from");
echo " <br> $d";
}

//teste den fünften empfänger
if
(!eregi("^[_a-z0-9-]+(\.[_a-z0-9-]+)*@[a-z0-9-]+(\.[a-z0-9-]+)*$", $e))
{
$empf= 1;
}
//fünfte mail an e
if ($falsch!=1 && $empf!=1)
{
mail("$e","$betreff","$text","FROM:$from");
echo " <br>und an $e";
}
//adressen in eine datei schreiben Sie müssen die datei anlegen
# $fname="mail-log.txt";

# $fl=fopen($fname,"a+");
# // sets the pipe delimiters
# #fwrite($fl,"'$a'|'$b'|'$c'|'$d'|'$e'|'$from'|'$kommentar'\n");
# fclose($fl);
endif;
?>