'********************************************************* '函数：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

　　推荐阅读

　　asp实现生成由数字，大写字母，小写字母指定位数的随机数

<% '****************************** '函数：gen_key(digits) '参数：digits----要生成随机数的位数 '作者：阿里西西 '日期：2007/7/13 '描述：生成由数字，大写字母，小写字母指定位数的随机数；返回值:要生成的指>>>详细阅读

本文标题：asp 下用正则表达式检测邮箱格式的函数

地址：http://www.17bianji.com/kaifa2/ASP/32503.html

 1/2    1