</perl>
<table bgcolor="#CCCCCC" align="center" cellspacing="2" border="0" cellpadding="0" >
<tr bgcolor="#FFFFFF">
<td align=right colspan="3">
<div align="left"><img src=http://www.rathaus-buerstadt.de/bilder/onlineformular3.jpg></div>
</td>
</tr>
<tr bgcolor="#FFFFFF">
<td align=right colspan="3">
<div align="center"> <b><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Reservierung
der städt. Grillhütte</font></b> <br>
</div>
</td>
</tr>
<form action="baseportal.pl?htx=$htx&cmd=addOnline" method="post" enctype="multipart/form-data" onsubmit="return formcheck()">
<input type=hidden name="htx=" value="$htx">
<input type=hidden name="cmd=" value="addOnline">
<tr bgcolor="#FFCC66">
<td align=right width="63"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Vorname:</font></td>
<td width="29"><font size=2 face=arial,helvetica>
<input type="text" name="Vorname:=" size=10 value="">
</font></td>
<td width="190"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Name:</font><font size=2 face=arial,helvetica>
<input type="text" name="Name:=" size=17 value="">
</font></td>
</tr>
<tr bgcolor="#FFCC66">
<td align=right width="63"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Strasse:</font></td>
<td width="29"><font size=2 face=arial,helvetica>
<input type="text" name="Strasse:=" size=20 value="">
</font></td>
<td width="173"><font size=2 face=arial,helvetica> </font></td>
</tr>
<tr bgcolor="#FFCC66">
<td align=right width="63"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">PLZ:</font></td>
<td colspan="2"><font size=2 face=arial,helvetica>
<input type="text" name="PLZ:=" size=5 value="">
</font><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Ort:</font><font size=2 face=arial,helvetica>
<input type="text" name="Ort:=" size=20 value="">
</font></td>
</tr>
<tr bgcolor="#FFCC66">
<td align=right width="63"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Tel:</font></td>
<td width="29"><font size=2 face=arial,helvetica>
<input type="text" name="Telefon:=" size=20 value="">
</font></td>
<td width="173"><font size=2 face=arial,helvetica> </font></td>
</tr>
<tr bgcolor="#FFCC66">
<td align=right width="63"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">E-Mail:</font></td>
<td width="29"><font size=2 face=arial,helvetica>
<input type="text" name="EMail:=" size=20 value="">
</font></td>
<td width="173"><font size=2 face=arial,helvetica> </font></td>
</tr>
<tr bgcolor="#FFCC66">
<td align=right width="63"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Termin:</font></td>
<td colspan="2"><font size=2 face=arial,helvetica>
<select name="_Termin_Tag:=">
<option>1
<option>2
<option>3
<option>4
<option>5
<option>6
<option>7
<option>8
<option>9
<option>10
<option>11
<option>12
<option>13
<option>14
<option>15
<option>16
<option>17
<option>18
<option>19
<option>20
<option>21
<option>22
<option>23
<option>24
<option>25
<option>26
<option>27
<option>28
<option>29
<option>30
<option>31
</select>
.
<select name="_Termin_Monat:=">
<option value="5">Mai
<option value="6">Juni
<option value="7">Juli
<option value="8">August
<option value="9">September
<option value="10">Oktober
</select>
.
<select name="_Termin_Jahr:=">
<option>2003
</select>
</font></td>
</tr>
<tr bgcolor="#FFCC66">
<td align=right width="63">
<p><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Anzahl
Personen:</font></p>
</td>
<td width="29"><font size=2 face=arial,helvetica>
<input type="text" name="Anzahl:=" size=3 value="">
</font></td>
<td width="173"><font size=2 face=arial,helvetica> </font></td>
</tr>
<tr bgcolor="#FFCC66">
<td width="63"><font face="Verdana, Arial, Helvetica, sans-serif" size="2"></font></td>
<td nowrap colspan="2">
<input type="image" name="click and go" src="http://www.rathaus-buerstadt.de/bilder/symbole/senden.gif" alt="abschicken" align="bottom" border="1">
</td>
</tr>
</form>
</table>{
get"$_[0]==!$_put{$_[0]}","$_[1]";
out"<b>$_put{$_[0]}</b> Termin ist bereits reserviert!" if ($_amount>0);
put undef,"$_[1]" if ($_amount==0);
}
#-------------------------------
</perl>
<perl>
if ($cmd eq "addOnline")
{
put undef,"grillhuette";
$inhalt="Sehr geehrte Damen und Herren,\n\nvielen Dank für Ihre Interesse an der städt. Grillhütte.\n\nIhre Eingaben waren:\n
Name: $Vorname $Name
Straße: $Strasse
Ort: $PLZ $Stadt
Telefon: $Telefon
E-Mail: $EMail
Gewünschter Termin: $_Termin_Tag.$_Termin_Monat.$_Termin_Jahr
Personenenzahl: $Anzahl\nSie werden umgehend von uns benachrichtigt, ob der gewünschte Termin noch frei ist.\n\nMit freundlichen Grüßen\nIhre Stadtverwaltung Bürstadt\n\nHauptamt\nRathausstr. 2\n68642 Bürstadt\nTel.:06206/ 701-232\nE-Mail: birgit.keiber\@buerstadt.de\nhttp://www.rathaus-buerstadt.de";
}
</perl>
<p align="center"> <font face="Verdana, Arial, Helvetica, sans-serif" size="2">
<a href="javascript:window.close()">Fenster schließen</a> </font>