少妇大叫太大太爽受不了,国产成人亚洲综合在线,老熟女草BX×

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

ASP動(dòng)態(tài)生成的javascript表單驗(yàn)證代碼

來源：易賢網(wǎng) 閱讀：587 次日期：2015-01-09 11:23:27

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

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

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

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

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

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

Response.Write strShow

End Sub

Function findJS(frmName,errStr)

Dim tmpArr

Dim i

'參數(shù)值

i=0

'獲取錯(cuò)誤列表，建立數(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" '確認(rèn)密碼和密碼必須相等的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" '確認(rèn)以數(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" '確認(rèn)10-101212格式的電話號(hào)碼

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" '確認(rèn)只包含英文字母及"-","_"在內(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" '確認(rèn)只包含數(shù)字及"-"在內(nèi)的Text類型（電話號(hào)碼及傳真常用）

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" '確認(rèn)是否為有效網(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" '確認(rèn)不大于固定位數(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" '確認(rèn)含有HTML標(biāo)記的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"

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

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

'當(dāng)級(jí)聯(lián)菜單第1項(xiàng)selectedIndex==0時(shí)，第2項(xiàng)的selectedIndex不能為0,第二項(xiàng)的selectedIndex!=0時(shí)，第3項(xiàng)的selectedIndex也不能為0

'此項(xiàng)用于檢查國家/省/市三項(xiàng)級(jí)聯(lián)菜單，當(dāng)國家不為中國時(shí)，省市可不填，為中國時(shí)，必須填寫省以及相對(duì)的市！

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" '確認(rèn)未被禁用的Select類型必須選擇格式:檢查的表單項(xiàng)|16|提示信息|關(guān)聯(lián)項(xiàng)"注：當(dāng)關(guān)聯(lián)項(xiàng)為第一項(xiàng)時(shí)，確認(rè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

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

使用范例：

<" CODEPAGE="936"%>

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

' 表單驗(yàn)證實(shí)例

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

'1、;

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

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

'4、Call CheckForm_js("formname,Guo_Error)

'www.knowsky.com

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

Dim Guo_Error

Guo_Error ="text|0|文本項(xiàng)必須填寫!,"

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

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

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

Guo_Error = Guo_Error & "moredigital|4|多位項(xiàng)必須大于4位!|4,"

Guo_Error = Guo_Error & "email|5|Mail項(xiàng)必須填寫Email地址!,"

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

Guo_Error = Guo_Error & "password2|7|確認(rèn)密碼必須與密碼項(xiàng)保持一致！|password1,"

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

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

Call CheckForm_js("form1",Guo_Error)

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

' 表單驗(yàn)證流程

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

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

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

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

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

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

待驗(yàn)證的表單

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

以上代碼絕大多數(shù)已通過測(cè)試，不過是不是都好用，我只能說那個(gè)級(jí)聯(lián)的下拉菜單用起來不太好用?？纯茨奈蝗市只騑EB美眉加以改進(jìn)嘍。呵呵

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

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

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

下一篇：對(duì)ASP腳本源代碼進(jìn)行加密

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

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

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

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

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

python 讀寫中文json的實(shí)例詳解10月30日

Objective-C Json 實(shí)例詳解10月30日

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

python生成二維碼的實(shí)例詳解10月30日

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

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

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

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

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

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

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

apache 開啟重定向 rewrite的實(shí)現(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é)點(diǎn)安裝教程10月23日

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

2025國考·省考課程試聽報(bào)名

報(bào)班類型
姓名
手機(jī)號(hào)
驗(yàn)證碼