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

技术交流
2024-10-01 10:11:01

<%
Option Explicit
Dim strDate

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

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

%>

</SPAN><SPAN style="FONT-FAMILY: 宋体; mso-ascii-font-family: ''; mso-hansi-font-family: ''; mso-bidi-font-size: 9.0pt">千花飞舞之日期验证</SPAN><SPAN lang=EN-US style="FONT-FAMILY: ''; mso-bidi-font-size: 9.0pt">

<%
strDate = Request.Form("strDate")
If strDate <> "" Then
On Error Resume Next
datDate = CDate(strDate)
If Err.Number = 0 Then
%>

<%
Else
%>

<%
End If
End If
%>

[1]

如何验证日期输入是否正确？由讯客互联技术交流栏目发布，感谢您对讯客互联的认可，以及对我们原创作品以及文章的青睐，非常欢迎各位朋友分享到个人网站或者朋友圈，但转载请说明文章出处“如何验证日期输入是否正确？”