ASP下拉文本框

[联袂入长安]

请问这道题的解题代码

[csdn_aspnet]

参考，具体日期自己处理下吧：

<select name="year1">
<option value="<%=year(Now())%>" selected="selected"><%=year(Now())%></option>
<%
for i=2001 to 2005
response.write "<option value='"&i&"'>"&i&"</option>"
next
%>
</select>
年
<select name="month1">
<option value="<%=month(Now())%>" selected="selected"><%=month(Now())%></option>
<%
for i=1 to 12
response.write "<option value='"&i&"'>"&i&"</option>"
next
%>
</select>
月
<select name="day1">
<option value="<%=day(Now())%>" selected="selected"><%=day(Now())%></option>
<%
for i=1 to 31
response.write "<option value='"&i&"'>"&i&"</option>"
next
%>
</select>日