asp 下用正则表达式检测邮箱格式的函数
2018-09-06 10:45
阅读：563
*********************************************************
函数：IsValidEmail[str]
参数：str，待处理的字符串
作者：木木
日期：2007/7/12
描述：检测邮箱格式是否为者格式
示例：)%>
*********************************************************
FunctionIsValidEmail(str)
DimregEx
SetregEx=NewRegExp
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)
EndFunction
评论
亲，登录后才可以留言！