Warning: mkdir(): Permission denied in /data/pub/txcms/system/lib/Fso.php on line 151
天下站长网 ASP 用vbscript判断email地址的合法性 - powered by andsky.com
投递文章 投稿指南 RSS订阅 站点通告:网站升级,部分数据正在导入之中,请等待..
您的位置:首页 >> Web编程 >> ASP

用vbscript判断email地址的合法性

发布时间:2005-12-17 23:24:16  文章来源:  浏览次数:2799  
承德互联 专业的unix(freebsd)主机 无限子域 BGP多线 自主开发面版 更快 更稳 更安全
这里是一断正则表达式的例子
<%
Function isemail(strng)
    isemail = false
    Dim regEx, Match ' Create variables.
    Set regEx = New RegExp   ' Create a regular expression object (stupid, huh?)
    regEx.Pattern = "^\w+((-\w+)|(\.\w+))*\@[A-Za-z0-9]+((\.|-)[A-Za-z0-9]+)*\.[A-Za-z0-9]+$" ' Sets pattern.
    regEx.IgnoreCase = True   ' Set case insensitivity.
    Set Match = regEx.Execute(strng)   ' Execute search.
if match.count then isemail= true
End Function
%>

作者:admin
与好友一起分享精彩内容:

收藏到QQ书签】【返回顶部】【返回首页
关于站点 - 广告服务 - 联系我们 - 版权隐私 - 免责声明 - 程序支持 - 网站地图 - 意见反馈 - 返回顶部