刚才又有人问到用javascript来验证日期，回想起自己写了一堆函数来验证日期，而且还没有涉及到闰年的问题，近来看到ASP 3.0关于On Error Resume Next的用法，灵机一动，嘿嘿……。真爽呀！
<%
Option Explicit
Dim strDate '记录输入的日期，字符型
Dim datDate '测试输入的日期是否正确，日期型
%>
<%
strDate = Request.Form("strDate")
If strDate <> "" Then
On Error Resume Next
datDate = CDate(strDate)
If Err.Number = 0 Then
%>
<%
Else
%>
<%
End If
End If
%>