服务器之家:专注于服务器技术及软件下载分享
分类导航

PHP教程|ASP.NET教程|JAVA教程|ASP教程|

服务器之家 - 编程语言 - ASP教程 - asp 下用正则表达式检测邮箱格式的函数

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

2019-10-12 10:37asp代码网 ASP教程

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

  1. '*********************************************************  
  2. '函数:IsValidEmail[str]  
  3. '参数:str,待处理的字符串  
  4. '作者:木木  
  5. '日期:2007/7/12  
  6. '描述:检测邮箱格式是否为xxxx@xxx.com或者xxxx@xxx.com.cn等格式  
  7. '示例:<%=IsValidEmail(ali@alixixi.com)%>  
  8. '*********************************************************  
  9.  
  10. Function IsValidEmail(str)  
  11. Dim regEx  
  12. Set regEx = New RegExp  
  13. regEx.Pattern = "[\w\-\.]+@[A-Za-z0-9]+\.(([A-Za-z0-9]{2,4})|([A-Za-z0-9]{2,4}\.[A-Za-z]{2,4}))$"  
  14. IsValidEmail = regEx.Test(str)  
  15. End Function  

延伸 · 阅读

精彩推荐