|
<!--#include file="strcheck.asp"-->
<%
'筆者在寫程序的過程中要用
'for i=1 to n
'Response.Write "<input type=text name=name"&n&" >"
'next
'但是在用javascript 中我不知道檢驗(yàn)的名稱，故想到了用ASP自動生成JavaScript代碼來檢驗(yàn)text
'通過過程的調(diào)用，你就可以用循環(huán)控制的form 里檢驗(yàn)。
'---------------------------------
' Create javascript by ASP
' write by MIS in 2001,3,31
' MIS@tonghua.com.cn
' http://www.meetweb.net
'---------------------------------
'JavaScript 的開始checkhead
Call checkhead
'檢查是否為空的字段 第一個(gè)參數(shù)是要檢查的框的名稱，第二個(gè)參數(shù)是提示錯(cuò)誤信息
nullcheck "name1","it is null string"
nullcheck "tel","it is null string"
'檢查是否為電話的字段 第一個(gè)參數(shù)是要檢查的框的名稱，第二個(gè)參數(shù)是提示錯(cuò)誤信息
checktel "tel","it must be a tel !"
'檢查是長度的字段檢查 第一個(gè)參數(shù)是要檢查的框的名稱，第二個(gè)參數(shù)是提示錯(cuò)誤信息
'第三個(gè)參數(shù)是長度最小值，第四個(gè)參數(shù)是長度的最大值
lengthcheck "changdu","it is max=8 and min=2","2","8"
'檢查是EMAIL的字段檢查 第一個(gè)參數(shù)是要檢查的框的名稱，第二個(gè)參數(shù)是提示錯(cuò)誤信息
Emailcheck "email","it must be a Email!"
'檢查是日期的字段檢查 第一個(gè)參數(shù)是要檢查的框的名稱，第二個(gè)參數(shù)是提示錯(cuò)誤信息
dateCheck "datestr","it is date"
nullcheck "numstr","it is null string"
'檢查是否為數(shù)字的字段 第一個(gè)參數(shù)是要檢查的框的名稱，第二個(gè)參數(shù)是提示錯(cuò)誤信息
numericcheck "numstr","it must be num!"
'JavaScript 的結(jié)束checktail
Call checktail
%>
<body>
<form name=form1 method=post action="index.asp" onsubmit="return send(this)">
是否為空：<input type=text name=name1 ><br>
電話檢驗(yàn)：<input type=text name=tel ><br>
長度檢驗(yàn)：<input type=text name=changdu >(2--8)<br>
Email檢查：<input type=text name=email><br>
日期檢查：<input type=text name=datestr>(2000-10-1)<br>
數(shù)字檢查：<input type=text name=numstr><br>
<input class=input type='submit' name='Submit' value='確定'>
</body>
|
