Hallo ich hab ein forum und dies ist jetzt ein Registierungsformular.
Aber das Funktioniert nicht könnt ihr die Fehler finden bitte.
<perl>
<form action="baseportal.pl?htx=/ailien5rpg_maker/ForumR/Regi&namerein=$namerein&sid=$sid&numma=$numma&cmd=add" method="post" enctype="multipart/form-data">
<input type=hidden name="htx=" value="/ailien5rpg_maker/ForumR/Regi"><input type=hidden name="namerein=" value="$namerein"><input type=hidden name="sid=" value="nein"><input type=hidden name="numma=" value="nein"><input type=hidden name="cmd=" value="add">
<table><tr><td align=right><p class="text"><font color=FFFFFF>Login-Name:</font>
</p></td><td><p class="text"><font color=FFFFFF>$namerein</font></p></td></tr>
<tr><td align=right><p class="text"><font color=FFFFFF>Passwort:</font>
</p></td><td><input type="password" name="new_pwrein1=" size=30 value="" style="border-color:#303030; background-color:#202020; color:#FFFFFF; font-family:arial, helvetica; font-size:12px; font-weight:bold;"></td></tr>
<tr><td align=right><p class="text"><font color=FFFFFF>Passwort bestätigen:</font>
</p></td><td><input type="password" name="new_pwrein2=" size=30 value="" style="border-color:#303030; background-color:#202020; color:#FFFFFF; font-family:arial, helvetica; font-size:12px; font-weight:bold;"></td></tr>
<tr><td></td><td nowrap><br><br><input type=submit value="Abschicken" style="border-color:#303030; background-color:#202020; color:#FFFFFF; font-family:arial, helvetica; font-size:12px; font-weight:bold;"> <input type=reset value="Zurücksetzen" style="border-color:#303030; background-color:#202020; color:#FFFFFF; font-family:arial, helvetica; font-size:12px; font-weight:bold;"></td></tr></table></form>
<br><br><table cellpadding=2 cellspacing=1 border=0><tr><td></td><td bgcolor=404040 align=center>
<a href=http://baseportal.de/cgi-bin/baseportal.pl?htx=/ailien5rpg_maker/ForumR/search&namerein=$namerein&sid=$sid><font color=00CCFF face="Times New Roman"><b>SUCHEN</b></font></a> </td>
<td></td><td bgcolor=404040 align=center>
<a href=http://baseportal.de/cgi-bin/baseportal.pl?htx=/ailien5rpg_maker/ForumR/adressen&namerein=$namerein&sid=$sid><font color=00CCFF face="Times New Roman"><b>ALLES</b></font></a> </td>
<td></td><td bgcolor=404040 align=center>
<a href=http://baseportal.de/cgi-bin/baseportal.pl?htx=/ailien5rpg_maker/ForumR/board&namerein=$namerein&sid=$sid&numma=$Numma><font color=00CCFF face="Times New Roman"><b>BOARD</b></font></a> </td>
<td></td><td bgcolor=404040 align=center>
<a href=http://baseportal.de/cgi-bin/baseportal.pl?htx=/ailien5rpg_maker/ForumR/change&namerein=$namerein&sid=$sid&numma=$Numma><font color=00CCFF face="Times New Roman"><b>PROFIL $namerein ändern</b></font></a> </td>
<td></td><td bgcolor=404040 align=center>
<a href=http://baseportal.de/cgi-bin/baseportal.pl?htx=/ailien5rpg_maker/ForumR/pw_change&namerein=$namerein&sid=$sid&numma=$Numma><font color=00CCFF face="Times New Roman"><b>PASSWORT ändern</b></font></a> </td>
<td></td><td bgcolor=404040 align=center>
<a href=baseportal.pl?htx=/ailien5rpg_maker/ForumR/adressen&cmd=logout&namerein=$namerein><font color=00CCFF face="Times New Roman"><b>LOG OUT</b></font></a> </td></tr>
<tr><td></td><td colspan=11 bgcolor=404040><table border=0 cellpadding=0 cellspacing=0><tr><td height=1></td></tr></table></td></tr>
</table>
EOF
if ($cmd eq "add")
{
get "nutzer_name==!$namerein","nutzer";
if ($old_pwrein eq $nutzer_passwort) {
if ($new_pwrein1 eq $new_pwrein2) {
mod "nutzer_name==!$namerein", ["nutzer_passwort", $new_pwrein1], "nutzer";
out "<p class=text><font color=FF0000>Anmeldugn bestätigt</font></p>";
}
}
</perl>
<include src=bottom>
