# Es ist nicht erlaubt das (c) von den Seiten zu entfernen!
# (c)Knusperleicht 2003
include("$GB_PATH"."db/sicherheit.dat");
include("$GB_PATH"."db/adminsett.dat");
include("$GB_PATH"."db/gbstatus.dat");
include("$GB_PATH"."db/effekt.dat");
include("$GB_PATH"."db/email.dat");
include("$GB_PATH"."db/design.dat");
?>
if($gbStatus == "Offline")
{
echo"
$gbStatusMeldung
";
}
else
{
if($gbArt == "Sofort Eintragen" OR $gbArt=="Vorschau")#Ausblenden
{}else{
//===============================================================================================
// Aufrufen der Templates
//===============================================================================================
templates();
menu();
//===============================================================================================
// Ausgabe der Textfelder
//===============================================================================================
echo"";
} #Ende von Ausblenden
//===============================================================================================
// FEHLERÜBERPRÜFUNG
//===============================================================================================
# Homepage wird überprüft
if($Submit == "Eintragen")
{
$gbCheckok = TRUE; # wird auf true gesetzt
#Überprüfen der Homepage
if($gbHp =="" OR $gbHp=="http://")
$gbHp="nichts";
#Überprüfen der Email
if($gbEmail =="")
{
$gbEmail="nichts";
}
else
{
$m = '^[a-z0-9_\.-]+@[a-z0-9_-]+\.[a-z0-9_\.-]+$'; #Zeichen die erlaubt sind
if (!(eregi($m,$gbEmail)))
{
$gbCheckEmail = "falsch"; #check wird auf falsch gesetzt
}
}
#Gender wird überprüft
if($gbGender=="")
$gbGender="nichts";
#Icq wird überprüft
if($gbIcq =="")
$gbIcq ="nichts";
#Wort wird auf Länge untersucht Wenn zu lang -> False
$kommentZuLang = FALSE;
foreach(explode(" ",str_replace("\n"," ",$gbKommentar)) as $text)
{
if (strlen($text) > $wortLaenge) # Länge des Wortes darf nicht länger als Admineinstellungen sein.
{
$textlang=strlen($text);
$allg=True;
$textZuLang=TRUE;
}
}
# Überprüfung der Maximalen Anzahl von Zeichen Mindestens / Höchstens
$wortAnzahl = str_replace(" ","",$gbKommentar );
if (strlen($wortAnzahl) > $maxZeichenAnz OR strlen($wortAnzahl) < $minZeichenAnz)
{
$allg=True;
$kommentZuLang=TRUE;
}
//===============================================================================================
// Ausgabe der Fehler
//===============================================================================================
if ($gbKommentar == "" OR $gbName == "")
{
echo "
Einen Namen, eine Nachricht und einen Titel sollten Sie schon hinterlassen! Zurück im Brower drücken!
";exit;
}
/*if($gbTitel == "")
{
echo "
Einen Namen, eine Nachricht und einen Titel sollten Sie schon hinterlassen! Zurück im Brower drücken!
";exit;
}*/
if($textZuLang==True)
{
echo"
Es gibt kein Wort das mehr als $wortLaenge Zeichen hat. Dein Wort hat:$textlangZeichen Zurück im Brower drücken!
";exit;
}
if($kommentZuLang==True)
{
echo"
Dein Kommentar muss mindestens $minZeichenAnz oder höchstens $maxZeichenAnz haben. Zurück im Brower drücken!