生成最新日期与时间选择(年月日)下拉框
深山行者个人网站 2011/1/26 14:48:24 深山行者 字体:
大 中 小 浏览 17855
<%
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> "
%>
这个虽然没有技术含量,但是在某些场合非常实用,这才是最关键的,生成最新日期与时间选择(年月日)下拉框
主要用于管理中心,用户选择出生日期等一类的需要日期的地方。
- 相关阅读
- 名扬石化设备
- 防止点击空链接时,页面往往重置到页首端
- asp之自动闭合HTML标签函数
- 微信公众号回复视频消息或用客服接口推送视频消息
- IE6.0, IE7.0和FireFox浏览器css样式兼容
- JS自动格式化输入的数字/千位分隔符
- 微信小程序-接入广告
- 青岛景色旅程