asp 下用正则表达式检测邮箱格式的函数
摘要：'*********************************************************'函数：IsValidE...
'*********************************************************
'函数：IsValidEmail[str]
'参数：str，待处理的字符串
'作者：木木
'日期：2007/7/12
'描述：检测邮箱格式是否为xxxx@xxx.com或者xxxx@xxx.com.cn等格式
'示例：<%=IsValidEmail(ali@alixixi.com)%>
'*********************************************************
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
【asp 下用正则表达式检测邮箱格式的函数】相关文章：