应用技巧

关注公众号 jb51net

关闭
首页 > 网络编程 > ASP编程 > 应用技巧 >

asp 下用正则表达式检测邮箱格式的函数

作者:

asp 下用正则表达式检测邮箱格式的函数
'*********************************************************
'函数:IsValidEmail[str]
'参数:str,待处理的字符串
'作者:木木
'日期:2007/7/12
'描述:检测邮箱格式是否为xxxx@xxx.com或者xxxx@xxx.com.cn等格式
'示例:<%=IsValidEmail(ali@alixixi.com)%>
'*********************************************************

Function IsValidEmail(str)
Dim regEx
Set regEx = New RegExp
regEx.Pattern = "[\w\-\.]+@[A-Za-z0-9]+\.(([A-Za-z0-9]{2,4})|([A-Za-z0-9]{2,4}\.[A-Za-z]{2,4}))$"
IsValidEmail = regEx.Test(str)
End Function

您可能感兴趣的文章:
阅读全文