生成最新日期与时间选择（年月日）下拉框
深山行者个人网站 2011/1/26 14:48:24 深山行者 字体:
大 中 小 浏览 19449
<%
Response.Write " <select size=""1"" name=""datYear"">"
For i = 2005 To Year(Date)
Response.Write "<option value=""" & i & """"
If i = Year(Date) Then
Response.Write " selected"
End If
Response.Write ">" & i & "</option>"
Next
Response.Write " </select> - "
Response.Write " <select size=""1"" name=""datMonth"">"
For i = 1 To 12
Response.Write "<option value=""" & i & """"
If i = Month(Date) Then
Response.Write " selected"
End If
Response.Write ">" & i & "</option>"
Next
Response.Write " </select> - "
Response.Write " <select size=""1"" name=""datDay"">"
For i = 1 To 31
Response.Write "<option value=""" & i & """"
If i = Day(Date) Then
Response.Write " selected"
End If
Response.Write ">" & i & "</option>"
Next
Response.Write " </select> "
%>
这个虽然没有技术含量，但是在某些场合非常实用，这才是最关键的，生成最新日期与时间选择（年月日）下拉框
主要用于管理中心，用户选择出生日期等一类的需要日期的地方。
- 相关阅读
- 旅行社管理系统商业版3.0发布
- 启用新版文章管理系统
- 利用background-color:#000000a8在背景颜色16进制代码之后加字母加上数字让背景色透明
- 长春康辉旅行社有限责任公司
- asp采用access数据库搜索信息时因为日文片假名问题提示“Microsoft JET Database Engine 错误80040e14”的解决方法
- 深山旅行社网站管理系统5.0发布
- 爱尚学生网
- 红色圣诞老人留言板模板
- 共有0条关于《生成最新日期与时间选择（年月日）下拉框》的评论
- 发表评论
苏公网安备 32070502010230号