当前位置: 首页 > 图文教程 > 网络编程 > ASP > asp 下用正则表达式检测邮箱格式的函数

ASP
ASP编程入门进阶(廿一):DAO SQL之建立数据库表
ASP应用之模板采用
ASP上传图片功能的又一实现(OLE对象)
asp中FSO复制文件代码
asp复制文件夹代码
实例演练ASP+XML编程比较全的了
利用ASP从远程服务器上接收XML数据的方法
PJ-Blog教程┊增强博客用户体验~让发表内容的同时拷贝到剪贴板以防丢失
TSYS一个新闻多种特性时如何进行前台更新?
TSYS资源特性的效率提高方法
重置TSYS系统中的所有"生成的文件"成"未生成文件"
TSYS中生成静态页时溢出: ''CInt''
asp实现防止站外提交内容的两个方法
ASP中生成文本文件的两种方式
ASP是否可以定时触发事件
ASP解压缩(在线解压缩类)
使用ASP删除指定IIS站点
使用ASP控制指定站点解析脚本语言函数
HTML标签及ASP函数速查表
如何使用Administrators组用户运行ASP程序

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


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-13   浏览: 279 ::
收藏到网摘: n/a

'*********************************************************
'函数:IsValidEmail[str]
'参数:str,待处理的字符串
'作者:木木
'日期:2007/7/12
'描述:检测邮箱格式是否为[email protected]或者[email protected]等格式
'示例:<%=IsValidEmail([email protected])%>
'*********************************************************
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