Я хоче сделать ввод даты, в моём случае даты рождения

Oleg 30.08.2003 22:41

Кусочек HTML формы

	<td><select name="month" size=1>
			<option value="01" selected>Январь</option>
			<option value="02" selected>Февраль</option><br>
			<option value="03" selected>Март</option><br>
			<option value="04" selected>Апрель</option><br>
			<option value="05" selected>Май</option>
			<option value="06" selected>Июнь</option>
			<option value="07" selected>Июль</option>
			<option value="08" selected>Август</option>
			<option value="09" selected>Сентябь</option>
			<option value="10" selected>Октябрь</option>
			<option value="11" selected>Ноябрь</option>
			<option value="12" selected>Декабрь</option>
	  </select></td>
</tr>
<tr>
	<td align="right">день:</td>
	<td><select name="day" size=1>
			^for[day](1;31){
			^if($day<10){$day_db[0$day]}{$day_db[$day]}
			<option value="$day_db" selected>$day_db</option>}
	  </select></td>

Обработчик данных из формы (я порезал код на куски, а вообще он у меня написан в одну строку)

$day_r[^if(def $form:year && 
                 def $form:month && 
                 def $form:day){
^if($form:year<10){190$form:year}{19$form:year}-
^if($form:month<10){0$form:month}{$form:month}-
^if($form:day<10){0$form:day}{$form:day}$form:day}{}]

---