当前位置：首页 > 资讯 > 技术文档

如何验证日期输入是否正确？

时间：2020-12-03 02:27 编辑：来源：阅读：
扫一扫，手机访问

摘要：如何验证日期输入是否正确？

<% Option Explicit Dim strDate

' 记录输入的日期,字符型. Dim datDate

' 测试输入的日期是否正确,日期型.

<html> %> <head> <title>千花飞舞之日期验证</title> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <link rel="stylesheet" href="../Css/export.css" type="text/css"> </head> <body text="#000000"> <Form name="InputDate" ACTION="<% = Request.ServerVariables("script_NAME") %>" METHOD="POST"> <table width="500" border="1" cellpadding="0" cellspacing="0" align="center"> <tr> <td background="../Pic/br.jpg"> <table width="500" border="0" cellpadding="4" cellspacing="4" class="9p"> <tr> <td colspan="2"> </td> </tr> <tr> <td colspan="2" height="60"> <div align="center">请输入所要查询的日期: <input type="text" name="strDate" value="<% = Cstr(Year(Now())) & "-" & Cstr(Month(Now())) & "-" & Cstr(Day(Now()))%>" size="10" maxlength="10"> </div> </td> </tr> <tr> <td width="50%"> <div align="center"> <input type="submit" name="Submit" value="确认"> </div> </td> <td> <div align="center"> <input type="reset" name="Submit2" value="取消"> </div> </td> </tr> </table> </td> </tr> </table> </Form> <% strDate = Request.Form("strDate") If strDate <> "" Then On Error Resume Next datDate = CDate(strDate) If Err.Number = 0 Then %> <Script Language="javascript">  </Script> <% Else %> <Script Language="javascript">  </Script> <% End If End If %> </body></html>

[b][1][/b]

全部评论(0)

上一篇：IIS W3C日志记录字段和HTTP状态代码的说明
下一篇：提高PHP编程效率的53个要点(经验小结)

资讯排行榜
更多>>