asp如何验证日期输入是否正确？
发布时间：2010-06-10 18:38:00
如何验证日期输入是否正确？
我们可以利用ASP 3.0里的On Error Resume Next来完成这项功能：
<％
Option Explicit
Dim strDate
' 记录输入的日期,字符型
Dim datDate
' 测试输入的日期是否正确,日期型
<html>
％>
<head>
<title>日期验证 - asp之家</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../Css/export.css" type="text/css">
</head>
<body bgcolor="#FFFFFF" 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">
<!--
InputDate.action="TypeAlert.asp"
InputDate.submit()
//-->
</Script>
<％
Else
％>
<Script Language="JavaScript">
<!--
alert ("噢,您输入的日期错啦,请重新输入!")
//-->
</Script>
<％
End If
End If
％>
</body>
</html>
0
投稿猜你喜欢
零、本讲学习目标了解面向对象编程思想掌握类和对象的定义和使用了解Python中的对象一、面向对象（一）程序员“面向对象”在现实世界中存在各种- <script type="text/vbscript">
- 下面的查询选择所有 date_col 值在最后 30 天内的记录。 mysql> SELECT something FROM tbl_
- Python自动化测试 Eclipse+Pydev 搭建开发环境C#之所以容易让人感兴趣，是因为安装完Visual Studio, 就可以很
- 第一章：基本的圆角框第二章：透明圆角化背景图片第三章：圆角化图片 第四章：CSS圆角框组件 V1.0在上面的案例中，我只给出最为原始的圆角框
- 1.go项目在window下编译简易打包1).在windows下直接编译生成main.exe文件在项目main.go同级目录下执行以下命令g
- 1.方法详情：parametrize(argnames,argvalues,indirect=False,ids=None,scope=No
- 本文转自微信公众号："算法与编程之美"一、前言三步搭建MUI页面主框架法包括新建含mui的HTML文件、输入mheade
- Birdseye是一个Python调试器，它在函数调用中记录表达式的值，并让你在函数退出后轻松查看它们，例如：无论你如何运行或编辑代码，都可
- 本文为大家分享了mysql 8.0.20 winx64安装配置方法，记录如下。MySQL官网：链接直接点击链接也可以下载：mysql 8.0
- 题目请设计并实现一款主机端口扫描程序。程序根据用户输入的域名或IP地址，可以查询该主机的开放的端口号。 例如：并有一定的异常处理参考code
- 目录1、发送get请求2、发送post请求3、发送https请求4、文件上传5、文件下载6、timeout超时7、鉴权7.1、auth参数鉴
- 导入库和数据首先，我们需要导入PyTorch和PyG库，然后准备好我们的数据。例如，我们可以使用以下方式生成一个简单的随机数据集：from
- 译者：AlphaImageLoader是一个让IE6正常显示PNG32时要用到的一个滤镜，但它在使用中也会产生一系列的问题，本文对使用Alp
- 前言本文主要介绍属性、事件和插槽这三个vue基础概念、使用方法及其容易被忽略的一些重要细节。如果你阅读别人写的组件，也可以从这三个部分展开，
- 计数排序找到给定序列的最小值与最大值创建一个长度为最大值-最小值+1的数组，初始化都为0然后遍历原序列，并为数组中索引为当前值－最小值的值＋
- 前言pymsql是Python中操作MySQL的模块，其使用方法和MySQLdb几乎相同。但目前pymysql支持python3.x而后者不
- 一、迷宫介绍用python解迷宫问题，迷宫是一个二维列表，本次用深度优先解开迷宫问题。定义起点和终点，从一个位置到下一个位置只能通过向上或下
- 如下：import pandas as pddf = pd.DataFrame({'Country':['China
- “博客就像一本书”这话其实几个月前深圳FB时就有扯到，这也不是什么新概念，也许本身就应该是这样。打个比方，当你拿到一本未看过的书时，理论上你
