Sponsor
|
ZackZack... Empfehle SmilieUpload weiter
«« Bääck");}
if (empty ($senderemail)) {
die ("Fehler: Na ohne deine Mail geht es nicht.«« Bääck");}
if (empty ($recipientname)) {
die ("Fehler: Ups...Wohin sollen wir senden?«« Bääck");}
if (empty ($recipientemail)) {
die ("Fehler: och...ohne Adresse keine Mail.«« Bääck");}
if(!eregi("^[a-z0-9\._-]+@+[a-z0-9\._-]+\.+[a-z]{2,4}$", $senderemail)) {
die("Fehler: Na ohne deine Mail geht es nicht. «« Bääck");}
if(!eregi("^[a-z0-9\._-]+@+[a-z0-9\._-]+\.+[a-z]{2,4}$", $recipientemail)) {
die("Fehler: Ups...Wohin sollen wir senden? «« Bääck");}
if(eregi("\n", $recipientemail)) {
die("Fehler: Name musste schon eigeben.«« Bääck");}
if(eregi("\r", $recipientemail)){
die("Fehler: Name musste schon eigeben.«« Bääck");}
if(eregi("\n", $senderemail)) {
die("Fehler: Na ohne deine Mail geht es nicht. «« Bääck");}
if(eregi("\r", $senderemail)){
die("Fehler: GeNa ohne deine Mail geht es nicht. «« Bääck");}
if(eregi("\n", $sendername)) {
die("Fehler: Name musste schon eigeben. «« Bääck");}
if(eregi("\r", $sendername)){
die("Fehler: Name musste schon eigeben. «« Bääck");}
$remote = getenv("REMOTE_ADDR");
//Ablaufzeit in Sekunden
$ablaufzeit = "$time" - "$sperrzeit";
//Abgelaufene IP-Adressen entfernen
$test = @file($iplog);
while (list ($line_num, $line) = @each ($test))
{$s = explode("&&",$line);
if($s[0] <= $ablaufzeit)
{
$fz = fopen( "$iplog", "r+" );
$c = fread($fz, filesize($iplog));
fclose($fz);
$line=quotemeta($line);
$string = "";
$c = ereg_replace($line, $string, $c);
$c1=fopen($iplog, "w+");
@flock($c1,2);
fputs($c1, $c);
@flock($c1,3);
fclose($c1);
}}
//IP-Prüfung
$ippruefung = @file($iplog);
while (list ($line_num, $line) = @each ($ippruefung))
{$ips = explode("&&",$line);
//IP-Adresse finden
if($ips[1] == $remote)
{
$ipf = "1";
//Prüfen, wieviel Empfehlungen bereits versendet wurden
if($ips[2] < $limit)
{
$z = $ips[2];
$z ++;
$fp = fopen($iplog, "r" );
$contents = fread($fp, filesize($iplog));
fclose($fp);
$string = "$ips[0]&&$ips[1]&&$z&&";
$replace = ereg_replace($line, $string, $contents);
$fh=fopen($iplog, "w");
@flock($fh,2);
fputs($fh, $replace);
@flock($fh,3);
fclose($fh);
}
if($ips[2] >= $limit)
{$gesperrt = "1";}
}
}
if($ipf != 1)
{
$string2 = "$time&&$remote&&1&&\n";
$fi=fopen($iplog, "a");
@flock($fi,2);
fputs($fi, $string2);
@flock($fi,3);
fclose($fi);
}
//URL der Seite zusammenstellen
if($gesperrt != "1")
{
$sendurl = "$url$id";
if ($anmerkungen == "")
{$anmerkungen = "Keine";}
//Nachricht versenden
$subject = "WebSite Empfehlung für Dich von $sendername";
$mailtext = "
Hallo mein Freund $recipientname,
$sendername ($senderemail) hat hier eine Empfehlung für Dich
Das absolute MUSS einen Blick drauf zu werfen und kostet nichts.
------------------------------------------------------------
$sendurl
.:: SmilieUpload.ch ::. - Und täglich werden es mehr -
Sei auch du bei dem Hype dabei
------------------------------------------------------
Private Info von $sendername an Dich:
$anmerkungen
";
mail($recipientemail,$subject,$mailtext,"From: $sendername <$senderemail>");
echo "Vielen Dank $sendername,
Geschafft. Du hast $recipientname an seine ($recipientemail) eine Mail gesendet das
das er sich hier blicken lassen soll. Gute Entscheidung... Denn auch $recipientname gehört dazu!
";
}
if($gesperrt == "1")
{echo "NaNaNa, willste hier zuspammen? 10 Stück in einer Stunde maximal. Komm dann halt wieder:)
";}
}
sponsor2();
sponsor3();
echo "
";
sponsor5();
echo "
";
?> |
|
Startseite
SmilieLetter
