{
$emsg.="Bitte geben Sie einen Text ein! " if $_put{Nachricht} eq "";
$emsg.="Der Text ist zu lang! Bitte kürzen Sie ihn auf maximal $maxtext Zeichen." if length($_put{Nachricht})>$maxtext;
$emsg.="Bitte geben Sie Ihre Telefonnummer ein! " if $_put{Telefon} eq "";
$emsg.="Bitte geben Sie Ihre E-Mailadresse ein! " if $_put{EMail} eq "";
if($emsg eq "")
{</perl>
<p><b>Wo gibt es Probleme?<br>
Sagen Sie uns Bescheid.</b></p><table><form action="baseportal.pl?htx=$htx&cmd=addOnline" method="post" enctype="multipart/form-data"><input type=hidden name="htx=" value="$htx"><input type=hidden name="cmd=" value="addOnline"><tr><td align=right><font size=2 face=verdana,arial,helvetica>Nachricht:</td><td><font size=2 face=verdana,arial,helvetica><textarea name="Nachricht:=" onFocus="this.value=''" cols=35 rows=4 wrap=virtual>
Bitte geben Sie hier Mängel, Anregungen und Wünsche ein. Wir sind bestrebt die Probleme so schnell es geht zu beheben.