<%
'*****************************************************************************
'函数名称：CheckForm_JS(frmName,errStr)
'功能：用ASP的方法动态写出JavaScript的表单验证的函数checkSubmit()
'使用方法：1、<!--Include File=URL 本函数所在的页>;
' 2、<form onsubmit="javascript:return checkSubmit()">;
'原作者已被忘却，二次开发作者：Guo.Q.M
'最后更新：2004
'*****************************************************************************
'帮助：
'-----------------------------------------------------------------------------
'·参数说明：
'frmName:表单域的名称
'errStr:验证列表，如："num|3|型号必须不小于8位|8,email|5|请输入正确的email格式"，这里
' num表示表单域名称，3表示验证参数，8表示不小于的位数（可选）
'
'·验证参数列表：
'0:必填的Text类型
'1:必填的ListMenu类型
'2:必须为数字的Text类型
'3:必须为指定位数的Text类型
'4:必须大于指定位数的Text类型
'5:必须为Email的Text类型
'6:必须为a-z或0-9的字符的Text类型
'7:确认密码和密码必须相等的Text类型
'8:确认不是以以数字开头的Text类型
'9:必须包含10-888888格式的Text类型
'10:不得包含中文、空格及其他非法字符的Text类型，即只能包含"_""-""0-9""a-z"A-Z"
'11:必须只包含数字及"-"在内的Text类型
'12:必须为正确网址的Text类型
'13:必须小于指定位数的Text类型
'14:不得包含HTML标记的Text类型
'15:确认未被禁用的Select类型必须选择 格式:检查的表单项|15|提示信息|关联项"
'注意：如有级联菜单，请将级联菜单的验证过程放到最后检验！！！！
'-----------------------------------------------------------------------------
%>
<%
Sub CheckForm_JS(frmName,errStr)
Dim tmpArr
Dim i
Dim strShow '输出JS的字符串
'获取错误列表，建立数组
tmpArr=Split(errStr,",")
'写JS
for i=0 to UBound(tmpArr)
if i<>0 then
strShow=strShow&;amp;"else "&;amp;findJS(frmName,tmpArr(i))
else
strShow=strShow&;amp;findJS(frmName,tmpArr(i))
end if
next
'输出
strShow="<script language=javascript>"&;amp;vbCrlf&;amp;_
"<!--"&;amp;vbCrlf&;amp;_
"//Power by Guoquanman 2004"&;amp;vbCrlf&;amp;_
"function checkSubmit()"&;amp;vbCrlf&;amp;_
"{"&;amp;vbCrlf&;amp;_
"var emailReg = /^[_a-z0-9] @([_a-z0-9] \.) [a-z0-9]{2,3}$/;"&;amp;vbCrlf&;amp;_
"var pwdReg = /[a-z0-9]$/;"&;amp;vbCrlf&;amp;_
"var uidBeginReg = /^[0-9] [_a-z0-9]/;"&;amp;vbCrlf&;amp;_
"var phoneReg = /\d{2}-\d{5}/;"&;amp;vbCrlf&;amp;_
"var phoneDetailReg = /[^0-9\-]/;"&;amp;vbCrlf&;amp;_
"var uidReg = /[^a-zA-Z0-9_\-]/;"&;amp;vbCrlf&;amp;_
"var htmlReg = /<(.*)>.*<\/\1>/;"&;amp;vbCrlf&;amp;_
"var re1 = /^http:\/\/[A-Za-z][A-Za-z0-9\-]*[A-Za-z]*\./;"&;amp;vbCrlf&;amp;_
"var re2 = /^http:\/\/[0-9]{1,5}[A-Za-z]*[0-9]*\./;"&;amp;vbCrlf&;amp;_
"var re3 = /\.{2,}/;"&;amp;vbCrlf&;amp;_
"var re4 = /\:{2,}/;"&;amp;vbCrlf&;amp;_
"var re5 = /\/{3,}/;"&;amp;vbCrlf&;amp;_
"var re6 = /\, /;"&;amp;vbCrlf&;amp;_
"var re7 = /\! /;"&;amp;vbCrlf&;amp;_
"var re8 = /\@ /;"&;amp;vbCrlf&;amp;_
"var re9 = /\# /;"&;amp;vbCrlf&;amp;_
"var re10 = /\$ /;"&;amp;vbCrlf&;amp;_
"var re11 = /\^ /;"&;amp;vbCrlf&;amp;_
"var re12 = /\* /;"&;amp;vbCrlf&;amp;_
"var re13 = /\| /;"&;amp;vbCrlf&;amp;_
"var re14 = /\.[a-z0-9_&;amp;=?\/]*[A-Za-z0-9\/\"]{2,}$/;"&;amp;vbCrlf&;amp;_
strShow&;amp;_
"else"&;amp;vbCrlf&;amp;_
"return true;"&;amp;vbCrlf&;amp;_
"}"&;amp;vbCrlf&;amp;_
"//-->"&;amp;vbCrlf&;amp;_
"</script>"
Response.Write strShow
End Sub
Function findJS(frmName,errStr)
Dim tmpArr
Dim i
'参数值
i=0
'获取错误列表，建立数组
tmpArr=Split(errStr,"|")
'输出查询条件
Select Case tmpArr(i 1)
Case "0" '必填的Text类型
findJS="if ((document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value)=="""")"&;amp;vbCrlf&;amp;_
"{"&;amp;vbCrlf&;amp;_
"window.alert ('"&;amp;tmpArr(i 2)&;amp;"');"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".select();"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".focus();"&;amp;vbCrlf&;amp;_
"return false;"&;amp;vbCrlf&;amp;_
"}"&;amp;vbCrlf
Exit Function
Case "1" '必填的ListMenu类型
findJS="if ((document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value)=="""")"&;amp;vbCrlf&;amp;_
"{"&;amp;vbCrlf&;amp;_
"window.alert ('"&;amp;tmpArr(i 2)&;amp;"');"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".focus();"&;amp;vbCrlf&;amp;_
"return false;"&;amp;vbCrlf&;amp;_
"}"&;amp;vbCrlf
Exit Function
Case "2" '必须为数字的Text类型
findJS="if (isNaN(document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value))"&;amp;vbCrlf&;amp;_
"{"&;amp;vbCrlf&;amp;_
"window.alert ('"&;amp;tmpArr(i 2)&;amp;"');"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".select();"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".focus();"&;amp;vbCrlf&;amp;_
"return false;"&;amp;vbCrlf&;amp;_
"}"&;amp;vbCrlf
Exit Function
Case "3" '必须为指定位数的Text类型
findJS="if (document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value.length!="&;amp;tmpArr(i 3)&;amp;")"&;amp;vbCrlf&;amp;_
"{"&;amp;vbCrlf&;amp;_
"window.alert ('"&;amp;tmpArr(i 2)&;amp;"');"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".select();"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".focus();"&;amp;vbCrlf&;amp;_
"return false;"&;amp;vbCrlf&;amp;_
"}"&;amp;vbCrlf
Exit Function
Case "4" '必须大于指定位数的Text类型
findJS="if (document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value.length<"&;amp;tmpArr(i 3)&;amp;")"&;amp;vbCrlf&;amp;_
"{"&;amp;vbCrlf&;amp;_
"window.alert ('"&;amp;tmpArr(i 2)&;amp;"');"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".select();"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".focus();"&;amp;vbCrlf&;amp;_
"return false;"&;amp;vbCrlf&;amp;_
"}"&;amp;vbCrlf
Exit Function
Case "5" '必须为Email的Text类型
findJS="if ((!emailReg.test(document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value))&;amp;&;amp;(document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value!=''))"&;amp;vbCrlf&;amp;_
"{"&;amp;vbCrlf&;amp;_
"window.alert ('"&;amp;tmpArr(i 2)&;amp;"');"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".select();"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".focus();"&;amp;vbCrlf&;amp;_
"return false;"&;amp;vbCrlf&;amp;_
"}"&;amp;vbCrlf
Exit Function
Case "6" '必须为a-z或0-9的字符的Text类型
findJS="if ((!pwdReg.test(document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value))&;amp;&;amp;(document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value!=''))"&;amp;vbCrlf&;amp;_
"{"&;amp;vbCrlf&;amp;_
"window.alert ('"&;amp;tmpArr(i 2)&;amp;"');"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".select();"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".focus();"&;amp;vbCrlf&;amp;_
"return false;"&;amp;vbCrlf&;amp;_
"}"&;amp;vbCrlf
Exit Function
Case "7" '确认密码和密码必须相等的Text类型
findJS="if ((document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value)!=(document."&;amp;frmName&;amp;"."&;amp;tmpArr(i 3)&;amp;".value))"&;amp;vbCrlf&;amp;_
"{"&;amp;vbCrlf&;amp;_
"window.alert ('"&;amp;tmpArr(i 2)&;amp;"');"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".select();"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".focus();"&;amp;vbCrlf&;amp;_
"return false;"&;amp;vbCrlf&;amp;_
"}"&;amp;vbCrlf
Exit Function
Case "8" '确认以数字开头的Text类型
findJS="if ((uidBeginReg.test(document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value))&;amp;&;amp;(document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value!=''))"&;amp;vbCrlf&;amp;_
"{"&;amp;vbCrlf&;amp;_
"window.alert ('"&;amp;tmpArr(i 2)&;amp;"');"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".select();"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".focus();"&;amp;vbCrlf&;amp;_
"return false;"&;amp;vbCrlf&;amp;_
"}"&;amp;vbCrlf
Exit Function
Case "9" '确认10-101212格式的电话号码
findJS="if ((!phoneReg.test(document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value))&;amp;&;amp;(document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value!=''))"&;amp;vbCrlf&;amp;_
"{"&;amp;vbCrlf&;amp;_
"window.alert ('"&;amp;tmpArr(i 2)&;amp;"');"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".select();"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".focus();"&;amp;vbCrlf&;amp;_
"return false;"&;amp;vbCrlf&;amp;_
"}"&;amp;vbCrlf
Exit Function
Case "10" '确认只包含英文字母及"-","_"在内的Text。（即不包括中文及其他特殊字符）
findJS="if ((uidReg.test(document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value))&;amp;&;amp;(document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value!=''))"&;amp;vbCrlf&;amp;_
"{"&;amp;vbCrlf&;amp;_
"window.alert ('"&;amp;tmpArr(i 2)&;amp;"');"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".select();"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".focus();"&;amp;vbCrlf&;amp;_
"return false;"&;amp;vbCrlf&;amp;_
"}"&;amp;vbCrlf
Exit Function
Case "11" '确认只包含数字及"-"在内的Text类型（电话号码及传真常用）
findJS="if ((phoneDetailReg.test(document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value))&;amp;&;amp;(document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value!=''))"&;amp;vbCrlf&;amp;_
"{"&;amp;vbCrlf&;amp;_
"window.alert ('"&;amp;tmpArr(i 2)&;amp;"');"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".select();"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".focus();"&;amp;vbCrlf&;amp;_
"return false;"&;amp;vbCrlf&;amp;_
"}"&;amp;vbCrlf
Exit Function
Case "12" '确认是否为有效网址！
findJS="if (((!re1.test(document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value))&;amp;&;amp;(!re2.test(document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value))"&;amp;_
"&;amp;&;amp;(document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value!=''))||"&;amp;_
"(re3.test(document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value))||(re4.test(document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value))||"&;amp;_
"(re5.test(document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value))||(re6.test(document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value))||"&;amp;_
"(re7.test(document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value))||(re8.test(document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value))||"&;amp;_
"(re9.test(document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value))||(re10.test(document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value))||"&;amp;_
"(re11.test(document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value))||(re12.test(document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value))||"&;amp;_
"(re13.test(document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value))||(!re14.test(document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value))"&;amp;_
"&;amp;&;amp;(document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value!=''))"&;amp;vbCrlf&;amp;_
"{"&;amp;vbCrlf&;amp;_
"window.alert('"&;amp;tmpArr(i 2)&;amp;"');"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".select();"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".focus();"&;amp;vbCrlf&;amp;_
"return false;"&;amp;vbCrlf&;amp;_
"}"&;amp;vbCrlf
Exit Function
Case "13" '确认不大于固定位数的Text类型
findJS="if (document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value.length>"&;amp;tmpArr(i 3)&;amp;")"&;amp;vbCrlf&;amp;_
"{"&;amp;vbCrlf&;amp;_
"window.alert('"&;amp;tmpArr(i 2)&;amp;"');"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".select();"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".focus();"&;amp;vbCrlf&;amp;_
"return false;"&;amp;vbCrlf&;amp;_
"}"&;amp;vbCrlf
Exit Function
Case "14" '确认含有HTML标记的Text类型
findJS="if(htmlReg.test(document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".value))"&;amp;vbCrlf&;amp;_
"{"&;amp;vbCrlf&;amp;_
"window.alert('"&;amp;tmpArr(i 2)&;amp;"');"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".select();"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".focus();"&;amp;vbCrlf&;amp;_
"return false;"&;amp;vbCrlf&;amp;_
"}"&;amp;vbCrlf
Exit Function
Case "15"
'=============================================================================================================
' 确认未被禁用的Select类型必须选择 格式:state|15|请选择所在省名称！|selCountry|city|请选择城市信息
'注：级联菜单第1项当selectedIndex!=0时，第2项第3项被禁用！无须检查其他两项
'当级联菜单第1项selectedIndex==0时，第2项的selectedIndex不能为0,第二项的selectedIndex!=0时，第3项的selectedIndex也不能为0
'此项用于检查国家/省/市三项级联菜单，当国家不为中国时，省市可不填，为中国时，必须填写省以及相对的市！
findJS="if (document."&;amp;frmName&;amp;"."&;amp;tmpArr(i 3)&;amp;".selectedIndex ==0)"&;amp;vbCrlf&;amp;_
"{"&;amp;vbCrlf&;amp;_
"if (document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".selectedIndex ==0)"&;amp;vbCrlf&;amp;_
"{"&;amp;vbCrlf&;amp;_
"window.alert('"&;amp;tmpArr(i 2)&;amp;"');"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".focus;"&;amp;vbCrlf&;amp;_
"return false;"&;amp;vbCrlf&;amp;_
"}"&;amp;vbCrlf&;amp;_
"else if (document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".selectedIndex != 0)"&;amp;vbCrlf&;amp;_
"{"&;amp;vbCrlf&;amp;_
"if (document."&;amp;frmName&;amp;"."&;amp;tmpArr(i 4)&;amp;".selectedIndex == 0)"&;amp;vbCrlf&;amp;_
"{"&;amp;vbCrlf&;amp;_
"window.alert('"&;amp;tmpArr(i 5)&;amp;"');"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i 4)&;amp;".focus;"&;amp;vbCrlf&;amp;_
"return false;"&;amp;vbCrlf&;amp;_
"}"&;amp;vbCrlf&;amp;_
"}"&;amp;vbCrlf&;amp;_
"}"&;amp;vbCrlf
Exit Function
Case "16" '确认未被禁用的Select类型必须选择 格式:检查的表单项|16|提示信息|关联项"注：当关联项为第一项时，确认开始！
findJS="if (document."&;amp;frmName&;amp;"."&;amp;tmpArr(i 3)&;amp;".selectedIndex != 0)"&;amp;vbCrlf&;amp;_
"{"&;amp;vbCrlf&;amp;_
"if (document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".selectedIndex == 0)"&;amp;vbCrlf&;amp;_
"{"&;amp;vbCrlf&;amp;_
"window.alert('"&;amp;tmpArr(i 2)&;amp;"');"&;amp;vbCrlf&;amp;_
"document."&;amp;frmName&;amp;"."&;amp;tmpArr(i)&;amp;".focus;"&;amp;vbCrlf&;amp;_
"return false;"&;amp;vbCrlf&;amp;_
"}"&;amp;vbCrlf&;amp;_
"}"&;amp;vbCrlf
Exit Function
End Select
End Function
%>
***********************************************************************
使用范例：
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#Include file = "inc/check_formJS.asp"-->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<%
'=======================================================================================
' 表单验证实例
'=======================================================================================
'1、<!--#Include file = "inc/check_formJS.asp"-->;
'2、绘制表单：name="" onsubmit = "Javascript: return checkSubmit()" 注意大小写;
'3、定义Guo_Error //一句只能出现一个“，”如位数和确认密码项须多加“|”指定参数;
'4、Call CheckForm_js("formname,Guo_Error)
'=======================================================================================
Dim Guo_Error
Guo_Error ="text|0|文本项必须填写!,"
Guo_Error = Guo_Error &;amp; "number|0|数字项必须填写且必须为数字！,"
Guo_Error = Guo_Error &;amp; "number|2|数字项必须为数字!,"
Guo_Error = Guo_Error &;amp; "digital|3|位数项必须为６位!|6,"
Guo_Error = Guo_Error &;amp; "moredigital|4|多位项必须大于4位!|4,"
Guo_Error = Guo_Error &;amp; "email|5|Mail项必须填写Email地址!,"
Guo_Error = Guo_Error &;amp; "caractor|6|字符项必须为0-9A-Z的字符!,"
Guo_Error = Guo_Error &;amp; "password2|7|确认密码必须与密码项保持一致！|password1,"
Guo_Error = Guo_Error &;amp; "listmenu|1|必须选择!"
Guo_Error = Guo_Error &;amp; "uid|8|用户名不能以数字开头!,"
Call CheckForm_js("form1",Guo_Error)
'=======================================================================================
' 表单验证流程
'=======================================================================================
'1、通过split(Guo_Error,".")拆分至数组tempArr();
'2、通过split(tempArr,"|")拆分至数组tempArr();
'3、Select Case split(tempArr(i 1),"|")执行验证及输出错误提示信息split(tempArr(i 2));
'4、Javascript区分大小写地，所以各表单组件的名称都要注意书写一致哟""
'=======================================================================================
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>表单验证实例</title>
</head>
<body>
<form name="form1" method="post" action="check_form.asp" onsubmit="JavaScript:return checkSubmit()">
<p align="center">待验证的表单</p>
*********************************************************************************
