| | Suchbegriff: | Formular Check | | Problem/Frage: | Formular Eingabe check, Namen, Länge, EMail, ICQ, Passwort | | E-Mail bei Rückfrage: | StarCraftTV (@) web.de | | Antwort: | Formfields Beispiel!
Nickname:
EMail:
ICQ:
nutzer_passwort:
Beschreibung: Prüft lange von NIckname & ICQ, und prüft ob die benötigten Felder: NIckname, Email ICQ und Passwort, nicht leer sind! PUT wird im diesem FAll für NEUEINTRAG verwendet
<perl>
my $maxtext=13; #Maximal länge für Nickname
my $maxtext2=9; #Maximal länge für ICQ
my $emsg="";
if(%_put)
{
$emsg.="1. Please enter your Nickname ! <br>" if $_put{Nickname} eq "";
$emsg.="2. Please enter your EMail ! <br>" if $_put{EMail} eq "";
$emsg.="3. Please enter your ICQ number !<br> " if $_put{ICQ} eq "";
$emsg.="4. Please enter your Password!<br> " if $_put{nutzer_passwort} eq "";
$emsg.="* Nickname maximal length $maxtext .<br>" if length($_put{Nickname})>$maxtext;
$emsg.="* ICQ Number is to long! maximal length $maxtext2 .<br> " if length($_put{ICQ})>$maxtext2;
if($emsg eq "")
{
put;
out "<ul><font color=06980a><b>Welcome, you have been registered<br> Please Log-In !b></font></ul>";
} else
{
out "<ul><font color=d80000><b>$emsg</b></font></ul>";
}
}
"";
</perl> |
|
|
