发信人: wuga(冰雨梦)
整理人: dongbao(2002-04-19 17:13:48), 站内信件
|
<!--#include file="strcheck.asp"-->
<%
'笔者在写程序的过程中要用
'for i=1 to n
'Response.Write "<input type=text name=name"&n&" >"
'next
'但是在用javascript 中我不知道检验的名称，故想到了用ASP自动生成JavaScript代码来检验text
'通过过程的调用，你就可以用循环控制的form 里检验。
'---------------------------------
' Create javascript by ASP
' write by MIS in 2001,3,31
' [email protected]
' http://www.meetweb.net
'---------------------------------
'JavaScript 的开始checkhead
Call checkhead
'检查是否为空的字段 第一个参数是要检查的框的名称，第二个参数是提示错误信息
nullcheck "name1","it is null string"
nullcheck "tel","it is null string"
'检查是否为电话的字段 第一个参数是要检查的框的名称，第二个参数是提示错误信息
checktel "tel","it must be a tel !"
'检查是长度的字段检查 第一个参数是要检查的框的名称，第二个参数是提示错误信息
'第三个参数是长度最小值，第四个参数是长度的最大值
lengthcheck "changdu","it is max=8 and min=2","2","8"
'检查是EMAIL的字段检查 第一个参数是要检查的框的名称，第二个参数是提示错误信息
Emailcheck "email","it must be a Email!"
'检查是日期的字段检查 第一个参数是要检查的框的名称，第二个参数是提示错误信息
dateCheck "datestr","it is date"
nullcheck "numstr","it is null string"
'检查是否为数字的字段 第一个参数是要检查的框的名称，第二个参数是提示错误信息
numericcheck "numstr","it must be num!"
'JavaScript 的结束checktail
Call checktail
%>
<body>
<form name=form1 method=post action="index.asp" onsubmit="return send(this)">
是否为空：<input type=text name=name1 ><br>
电话检验：<input type=text name=tel ><br>
长度检验：<input type=text name=changdu >(2--8)<br>
Email检查：<input type=text name=email><br>
日期检查：<input type=text name=datestr>(2000-10-1)<br>
数字检查：<input type=text name=numstr><br>
<input class=input type='submit' name='Submit' value='确定'>
</body>
----
因为我, 能相信, 爱你, 是真的, 爱你, 不会让你后悔。
寂寞的冬, 想你的夜, 王子与公主, 世界这分钟永恒。
爱的证据, 如潮水, 已成风。逃, 两个人的森林。
错过你, 错过爱。有你真的快乐吗? 一定可以, 曾经等待。
因为我, 能相信, 爱你, 是真的, 爱你。且行且珍惜。 |
|