asp email郵箱地址驗證正則表達式
更新時間：2010年05月27日 11:52:15 作者：
剛才說了郵箱驗證先可用js來處理，然后再由asp,php來做，下面我來看看一個asp 郵箱地址驗證正則表達式全新實例吧。
上篇文章我們用字符串查找的方法實現(xiàn)了asp email郵箱地址的驗證，有可能比較喜歡正則表達式的朋友，這里也給出相應(yīng)的代碼。
方法一
復(fù)制代碼 代碼如下:
Public Function ChkMail(ByVal Email)
Dim Rep,Pmail : ChkMail = True : Set Rep = New RegExp
Rep.Pattern = "([.a-zA-Z0-9_-]){2,10}@([a-zA-Z0-9_-]){2,10}(.([a-zA-Z0-9]){2,}){1,4}$"
Pmail = Rep.Test(Email) : Set Rep = Nothing
If Not Pmail Then ChkMail = False
End Function
郵箱地址驗證二
復(fù)制代碼 代碼如下:
<%
Function isemail(strng)
isemail = false
Dim regEx, Match
Set regEx = New RegExp
regEx.Pattern = "^w+((-w+)|(.w+))*@[A-Za-z0-9]+((.|-)[A-Za-z0-9]+)*.[A-Za-z0-9]+$"
regEx.IgnoreCase = True
Set Match = regEx.Execute(strng)
if match.count then isemail= true
End Function
%>
方法三
復(fù)制代碼 代碼如下:
Public Function IsEmail(ByVal PString)
Dim Plt,Pgt : Plt = False : Pgt = False
For x = 2 To Len(PString) - 1
If Mid(PString,x,1) = "@" Then Plt = True
If Mid(PString,x,1) = "." And Plt = True Then Pgt = True
Next
If Plt = True And Pgt = True Then
IsEmail = True
Else
IsEmail = False
End if
End Function
%>
我們來看看驗證一的實例使用方法
復(fù)制代碼 代碼如下:
If ChkMail(admin@jb51.net) = True Then
Response.Write "格式正確"
Else
Response.Write "格式有誤"
End If
相關(guān)文章
JS正則表達式一條龍講解，從原理和語法到JS正則、ES6正則擴展，最后再到正則實踐思路2017-04-04
正則表達式，一個十分古老而又強大的文本處理工具，僅僅用一段非常簡短的表達式語句，便能夠快速實現(xiàn)一個非常復(fù)雜的業(yè)務(wù)邏輯。知道這20個正則表達式，能讓你少寫1000行代碼，想知道嗎2016-04-04
用(?>…)實現(xiàn)固化分組(成功匹配后，回簌時不會考慮這個匹配的字符)2012-10-10
這篇文章主要介紹了Snort中pcre和正則表達式的使用,題目要求檢測包含兩個包的特定流，需要通過設(shè)置標記位，即flowbits來實現(xiàn)，感興趣的朋友跟隨小編一起看看吧2022-03-03
Python如何使用正則表達式識別代碼中的中文、英文和數(shù)字
正則表達式是一種強大的工具，可以幫助我們實現(xiàn)識別代碼中的中文、英文和數(shù)字，本文將分三個部分詳細介紹如何使用正則表達式在 Python 中識別代碼中的中文、英文和數(shù)字，感興趣的朋友跟隨小編一起看看吧2023-06-06
這篇文章主要介紹了php正則替換變量指定字符的方法,涉及php使用正則表達式進行字符串替換的技巧,非常具有實用價值,需要的朋友可以參考下2015-03-03
這篇文章主要介紹了正則表達式與HTML5新元素的相關(guān)資料,非常不錯，具有參考借鑒價值，需要的朋友可以參考下2016-08-08
[藍色]一個關(guān)于正則表達式的問題...2006-12-12
這篇文章主要介紹了淺談?wù)齽t速記法的技巧，對大部分人來說，正則主要是難記，其實只要對正則符號分類記憶，就會發(fā)現(xiàn)核心概念其實特別簡單，感興趣的小伙伴們可以參考一下2019-01-01
日常編程經(jīng)常會用到正則表達式,躲不開這個陷阱,本文主要介紹了淺談?wù)齽t表達式回溯陷阱,具有一定的參考價值,感興趣的可以了解一下2023-11-11