purnhurb安装包,国产精品一区二区三区Av,中文字幕亚洲欧美专区

當前位置：首頁 > 范文|應(yīng)用文 > IT技術(shù)專欄 > 網(wǎng)絡(luò)編程

ASP動態(tài)生成的javascript表單驗證代碼

來源：易賢網(wǎng) 閱讀：908 次日期：2014-09-19 09:22:21

溫馨提示：易賢網(wǎng)小編為您整理了“ASP動態(tài)生成的javascript表單驗證代碼”,方便廣大網(wǎng)友查閱！

以網(wǎng)上down了一個ASP動態(tài)生成Form驗證Javascript的代碼，自己擴容了一下。作者的大名我給忘了，不過我記得清楚，從第一條至第九條的代碼都是該作者的原創(chuàng)。至于九至第十五條卻是本人自己加的哦。而且由于本人水平有限，從第九條至第十五條不見得會條條生效?。亢呛?，其實把它貼在這里沒有什么必要的，因為這點小會伎倆誰都會用的，我把它的作用定位為：開發(fā)時找不到該函數(shù)時到這里拷貝一下就可以了。呵，因為我即沒有刻錄機也沒有移動硬盤。實在是沒有辦法把這些代碼隨身攜帶，不過還好，在北京到處都可以上網(wǎng)。所以就把這個放在這里，用的時候Ctrl+C,再Ctrl+V好了。

'****************************************************************

'函數(shù)名稱：CheckForm_JS(frmName,errStr)

'功能：用ASP的方法動態(tài)寫出JavaScript的表單驗證的函數(shù)checkSubmit()

'使用方法：1、"&vbCrlf&_

Response.Write strShow

End Sub

Function findJS(frmName,errStr)

Dim tmpArr

Dim i

'參數(shù)值

i=0

'獲取錯誤列表，建立數(shù)組

tmpArr=Split(errStr,"|")

'輸出查詢條件

Select Case tmpArr(i+1)

Case "0" '必填的Text類型

findJS="if ((document."&frmName&"."&tmpArr(i)&".value)=="""")"&vbCrlf&_

"{"&vbCrlf&_

"window.alert ('"&tmpArr(i+2)&"');"&vbCrlf&_

"document."&frmName&"."&tmpArr(i)&".select();"&vbCrlf&_

"document."&frmName&"."&tmpArr(i)&".focus();"&vbCrlf&_

"return false;"&vbCrlf&_

"}"&vbCrlf

Exit Function

Case "1" '必填的ListMenu類型

findJS="if ((document."&frmName&"."&tmpArr(i)&".value)=="""")"&vbCrlf&_

"{"&vbCrlf&_

"window.alert ('"&tmpArr(i+2)&"');"&vbCrlf&_

"document."&frmName&"."&tmpArr(i)&".focus();"&vbCrlf&_

"return false;"&vbCrlf&_

"}"&vbCrlf

Exit Function

Case "2" '必須為數(shù)字的Text類型

findJS="if (isNaN(document."&frmName&"."&tmpArr(i)&".value))"&vbCrlf&_

"{"&vbCrlf&_

"window.alert ('"&tmpArr(i+2)&"');"&vbCrlf&_

"document."&frmName&"."&tmpArr(i)&".select();"&vbCrlf&_

"document."&frmName&"."&tmpArr(i)&".focus();"&vbCrlf&_

"return false;"&vbCrlf&_

"}"&vbCrlf

Exit Function

Case "3" '必須為指定位數(shù)的Text類型

findJS="if (document."&frmName&"."&tmpArr(i)&".value.length!="&tmpArr(i+3)&")"&vbCrlf&_

"{"&vbCrlf&_

"window.alert ('"&tmpArr(i+2)&"');"&vbCrlf&_

"document."&frmName&"."&tmpArr(i)&".select();"&vbCrlf&_

"document."&frmName&"."&tmpArr(i)&".focus();"&vbCrlf&_

"return false;"&vbCrlf&_

"}"&vbCrlf

Exit Function

Case "4" '必須大于指定位數(shù)的Text類型

findJS="if (document."&frmName&"."&tmpArr(i)&".value.length<"&tmpArr(i+3)&")"&vbCrlf&_

"{"&vbCrlf&_

"window.alert ('"&tmpArr(i+2)&"');"&vbCrlf&_

"document."&frmName&"."&tmpArr(i)&".select();"&vbCrlf&_

"document."&frmName&"."&tmpArr(i)&".focus();"&vbCrlf&_

"return false;"&vbCrlf&_

"}"&vbCrlf

Exit Function

Case "5" '必須為Email的Text類型

findJS="if ((!emailReg.test(document."&frmName&"."&tmpArr(i)&".value))&&(document."&frmName&"."&tmpArr(i)&".value!=''))"&vbCrlf&_

"{"&vbCrlf&_

"window.alert ('"&tmpArr(i+2)&"');"&vbCrlf&_

"document."&frmName&"."&tmpArr(i)&".select();"&vbCrlf&_

"document."&frmName&"."&tmpArr(i)&".focus();"&vbCrlf&_

"return false;"&vbCrlf&_

"}"&vbCrlf

Exit Function

Case "6" '必須為a-z或0-9的字符的Text類型

findJS="if ((!pwdReg.test(document."&frmName&"."&tmpArr(i)&".value))&&(document."&frmName&"."&tmpArr(i)&".value!=''))"&vbCrlf&_

"{"&vbCrlf&_

"window.alert ('"&tmpArr(i+2)&"');"&vbCrlf&_

"document."&frmName&"."&tmpArr(i)&".select();"&vbCrlf&_

"document."&frmName&"."&tmpArr(i)&".focus();"&vbCrlf&_

"return false;"&vbCrlf&_

"}"&vbCrlf

Exit Function

Case "7" '確認密碼和密碼必須相等的Text類型

findJS="if ((document."&frmName&"."&tmpArr(i)&".value)!=(document."&frmName&"."&tmpArr(i+3)&".value))"&vbCrlf&_

"{"&vbCrlf&_

"window.alert ('"&tmpArr(i+2)&"');"&vbCrlf&_

"document."&frmName&"."&tmpArr(i)&".select();"&vbCrlf&_

"document."&frmName&"."&tmpArr(i)&".focus();"&vbCrlf&_

"return false;"&vbCrlf&_

"}"&vbCrlf

Exit Function

Case "8" '確認以數(shù)字開頭的Text類型

findJS="if ((uidBeginReg.test(document."&frmName&"."&tmpArr(i)&".value))&&(document."&frmName&"."&tmpArr(i)&".value!=''))"&vbCrlf&_

"{"&vbCrlf&_

"window.alert ('"&tmpArr(i+2)&"');"&vbCrlf&_

"document."&frmName&"."&tmpArr(i)&".select();"&vbCrlf&_

"document."&frmName&"."&tmpArr(i)&".focus();"&vbCrlf&_

"return false;"&vbCrlf&_

"}"&vbCrlf

Exit Function

Case "9" '確認10-101212格式的電話號碼

findJS="if ((!phoneReg.test(document."&frmName&"."&tmpArr(i)&".value))&&(document."&frmName&"."&tmpArr(i)&".value!=''))"&vbCrlf&_

"{"&vbCrlf&_

"window.alert ('"&tmpArr(i+2)&"');"&vbCrlf&_

"document."&frmName&"."&tmpArr(i)&".select();"&vbCrlf&_

"document."&frmName&"."&tmpArr(i)&".focus();"&vbCrlf&_

"return false;"&vbCrlf&_

"}"&vbCrlf

Exit Function

Case "10" '確認只包含英文字母及"-","_"在內(nèi)的Text。（即不包括中文及其他特殊字符）

findJS="if ((uidReg.test(document."&frmName&"."&tmpArr(i)&".value))&&(document."&frmName&"."&tmpArr(i)&".value!=''))"&vbCrlf&_

"{"&vbCrlf&_

"window.alert ('"&tmpArr(i+2)&"');"&vbCrlf&_

"document."&frmName&"."&tmpArr(i)&".select();"&vbCrlf&_

"document."&frmName&"."&tmpArr(i)&".focus();"&vbCrlf&_

"return false;"&vbCrlf&_

"}"&vbCrlf

Exit Function

Case "11" '確認只包含數(shù)字及"-"在內(nèi)的Text類型（電話號碼及傳真常用）

findJS="if ((phoneDetailReg.test(document."&frmName&"."&tmpArr(i)&".value))&&(document."&frmName&"."&tmpArr(i)&".value!=''))"&vbCrlf&_

"{"&vbCrlf&_

"window.alert ('"&tmpArr(i+2)&"');"&vbCrlf&_

"document."&frmName&"."&tmpArr(i)&".select();"&vbCrlf&_

"document."&frmName&"."&tmpArr(i)&".focus();"&vbCrlf&_

"return false;"&vbCrlf&_

"}"&vbCrlf

Exit Function

Case "12" '確認是否為有效網(wǎng)址！

findJS="if (((!re1.test(document."&frmName&"."&tmpArr(i)&".value))&&(!re2.test(document."&frmName&"."&tmpArr(i)&".value))"&_

"&&(document."&frmName&"."&tmpArr(i)&".value!=''))||"&_

"(re3.test(document."&frmName&"."&tmpArr(i)&".value))||(re4.test(document."&frmName&"."&tmpArr(i)&".value))||"&_

"(re5.test(document."&frmName&"."&tmpArr(i)&".value))||(re6.test(document."&frmName&"."&tmpArr(i)&".value))||"&_

"(re7.test(document."&frmName&"."&tmpArr(i)&".value))||(re8.test(document."&frmName&"."&tmpArr(i)&".value))||"&_

"(re9.test(document."&frmName&"."&tmpArr(i)&".value))||(re10.test(document."&frmName&"."&tmpArr(i)&".value))||"&_

"(re11.test(document."&frmName&"."&tmpArr(i)&".value))||(re12.test(document."&frmName&"."&tmpArr(i)&".value))||"&_

"(re13.test(document."&frmName&"."&tmpArr(i)&".value))||(!re14.test(document."&frmName&"."&tmpArr(i)&".value))"&_

"&&(document."&frmName&"."&tmpArr(i)&".value!=''))"&vbCrlf&_

"{"&vbCrlf&_

"window.alert('"&tmpArr(i+2)&"');"&vbCrlf&_

"document."&frmName&"."&tmpArr(i)&".select();"&vbCrlf&_

"document."&frmName&"."&tmpArr(i)&".focus();"&vbCrlf&_

"return false;"&vbCrlf&_

"}"&vbCrlf

Exit Function

Case "13" '確認不大于固定位數(shù)的Text類型

findJS="if (document."&frmName&"."&tmpArr(i)&".value.length>"&tmpArr(i+3)&")"&vbCrlf&_

"{"&vbCrlf&_

"window.alert('"&tmpArr(i+2)&"');"&vbCrlf&_

"document."&frmName&"."&tmpArr(i)&".select();"&vbCrlf&_

"document."&frmName&"."&tmpArr(i)&".focus();"&vbCrlf&_

"return false;"&vbCrlf&_

"}"&vbCrlf

Exit Function

Case "14" '確認含有HTML標記的Text類型

findJS="if(htmlReg.test(document."&frmName&"."&tmpArr(i)&".value))"&vbCrlf&_

"{"&vbCrlf&_

"window.alert('"&tmpArr(i+2)&"');"&vbCrlf&_

"document."&frmName&"."&tmpArr(i)&".select();"&vbCrlf&_

"document."&frmName&"."&tmpArr(i)&".focus();"&vbCrlf&_

"return false;"&vbCrlf&_

"}"&vbCrlf

Exit Function

Case "15"

'==========================================================

'注：級聯(lián)菜單第1項當selectedIndex!=0時，第2項第3項被禁用！無須檢查其他兩項

'當級聯(lián)菜單第1項selectedIndex==0時，第2項的selectedIndex不能為0,第二項的selectedIndex!=0時，第3項的selectedIndex也不能為0

'此項用于檢查國家/省/市三項級聯(lián)菜單，當國家不為中國時，省市可不填，為中國時，必須填寫省以及相對的市！

findJS="if (document."&frmName&"."&tmpArr(i+3)&".selectedIndex ==0)"&vbCrlf&_

"{"&vbCrlf&_

"if (document."&frmName&"."&tmpArr(i)&".selectedIndex ==0)"&vbCrlf&_

"{"&vbCrlf&_

"window.alert('"&tmpArr(i+2)&"');"&vbCrlf&_

"document."&frmName&"."&tmpArr(i)&".focus;"&vbCrlf&_

"return false;"&vbCrlf&_

"}"&vbCrlf&_

"else if (document."&frmName&"."&tmpArr(i)&".selectedIndex != 0)"&vbCrlf&_

"{"&vbCrlf&_

"if (document."&frmName&"."&tmpArr(i+4)&".selectedIndex == 0)"&vbCrlf&_

"{"&vbCrlf&_

"window.alert('"&tmpArr(i+5)&"');"&vbCrlf&_

"document."&frmName&"."&tmpArr(i+4)&".focus;"&vbCrlf&_

"return false;"&vbCrlf&_

"}"&vbCrlf&_

"}"&vbCrlf

Exit Function

Case "16" '確認未被禁用的Select類型必須選擇格式:檢查的表單項|16|提示信息|關(guān)聯(lián)項"注：當關(guān)聯(lián)項為第一項時，確認開始！

findJS="if (document."&frmName&"."&tmpArr(i+3)&".selectedIndex != 0)"&vbCrlf&_

"{"&vbCrlf&_

"if (document."&frmName&"."&tmpArr(i)&".selectedIndex == 0)"&vbCrlf&_

"{"&vbCrlf&_

"window.alert('"&tmpArr(i+2)&"');"&vbCrlf&_

"document."&frmName&"."&tmpArr(i)&".focus;"&vbCrlf&_

"return false;"&vbCrlf&_

"}"&vbCrlf&_

"}"&vbCrlf

Exit Function

End Select

End Function

***********************************************************************

使用范例：

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>

http://www.w3.org/TR/html4/loose.dtd">

'==========================================================

' 表單驗證實例

'==========================================================

'1、;

'2、繪制表單：name="" onsubmit = "Javascript: return checkSubmit()" 注意大小寫;

'3、定義Guo_Error //一句只能出現(xiàn)一個“，”如位數(shù)和確認密碼項須多加“|”指定參數(shù);

'4、Call CheckForm_js("formname,Guo_Error)

'www.knowsky.com

'==========================================================

Dim Guo_Error

Guo_Error ="text|0|文本項必須填寫!,"

Guo_Error = Guo_Error & "number|0|數(shù)字項必須填寫且必須為數(shù)字！,"

Guo_Error = Guo_Error & "number|2|數(shù)字項必須為數(shù)字!,"

Guo_Error = Guo_Error & "digital|3|位數(shù)項必須為６位!|6,"

Guo_Error = Guo_Error & "moredigital|4|多位項必須大于4位!|4,"

Guo_Error = Guo_Error & "email|5|Mail項必須填寫Email地址!,"

Guo_Error = Guo_Error & "caractor|6|字符項必須為0-9A-Z的字符!,"

Guo_Error = Guo_Error & "password2|7|確認密碼必須與密碼項保持一致！|password1,"

Guo_Error = Guo_Error & "listmenu|1|必須選擇!"

Guo_Error = Guo_Error & "uid|8|用戶名不能以數(shù)字開頭!,"

Call CheckForm_js("form1",Guo_Error)

'==========================================================

' 表單驗證流程

'==========================================================

'1、通過split(Guo_Error,".")拆分至數(shù)組tempArr();

'2、通過split(tempArr,"|")拆分至數(shù)組tempArr();

'3、Select Case split(tempArr(i+1),"|")執(zhí)行驗證及輸出錯誤提示信息split(tempArr(i+2));

'4、Javascript區(qū)分大小寫地，所以各表單組件的名稱都要注意書寫一致喲~~

'==========================================================

待驗證的表單

***************************************************************

以上代碼絕大多數(shù)已通過測試，不過是不是都好用，我只能說那個級聯(lián)的下拉菜單用起來不太好用。看看哪位仁兄或WEB美眉加以改進嘍。呵呵

更多信息請查看IT技術(shù)專欄

更多信息請查看網(wǎng)絡(luò)編程

上一篇：利用ASP在瀏覽器上打印輸出

下一篇：在ASP中通過oo4o連接Oracle數(shù)據(jù)庫的例子

易賢網(wǎng)手機網(wǎng)站地址：ASP動態(tài)生成的javascript表單驗證代碼

由于各方面情況的不斷調(diào)整與變化，易賢網(wǎng)提供的所有考試信息和咨詢回復(fù)僅供參考，敬請考生以權(quán)威部門公布的正式信息和咨詢?yōu)闇剩?/div>

相關(guān)閱讀網(wǎng)絡(luò)編程

Shell中如何刪除文本比較長的行的實現(xiàn)方法10月30日

vue.js語法及常用指令10月30日

python 讀寫中文json的實例詳解10月30日

Objective-C Json 實例詳解10月30日

bootstrap table sum總數(shù)量統(tǒng)計實現(xiàn)方法10月30日

python生成二維碼的實例詳解10月30日

Python批量更改文件名的實現(xiàn)方法10月30日

解決出現(xiàn)Incorrect integer value的問題10月30日

jQuery實現(xiàn)切換隱藏與顯示同時切換圖標功能10月30日

docker python api 安裝配置的詳解10月30日

javascript按鈕禁用和啟用的效果實例代碼10月30日

vue.js todolist實現(xiàn)代碼10月30日

vue.js 父向子組件傳參的實例代碼10月30日

apache 開啟重定向 rewrite的實現(xiàn)方法10月30日

Vue.js劃分組件的方法10月30日

python logging日志模塊的詳解10月30日

vue中的scope使用詳解10月30日

docker cgroup 資源監(jiān)控的詳解10月30日

使用Android Studio 開發(fā)自己的SDK教程10月23日

linux系統(tǒng)下MongoDB單節(jié)點安裝教程10月23日

易賢網(wǎng)移動網(wǎng)站

2025國考·省考課程試聽報名

報班類型
姓名
手機號
驗證碼