当前位置: 首页 > 图文教程 > 网络编程 > 正则表达式 > 正则表达式简单的检查输入email是否合法程序

正则表达式
python 正则表达式 反斜杠(/)的麻烦和陷阱
利用正则表达式(只录入中文,数字,英文)
匹配中文的正则(GB2312/utf-8)
JavaScript 实现基础 正则表达式
正则表达式中\w不能识别中文
PHP 正则表达式验证中文的问题
php中utf-8编码下用正则表达式如何匹配汉字
PHP正则匹配图片并给图片加链接详解
PHP 正则表达式的几则使用技巧
PHP 正则表达式常用函数使用小结
常用正则表达式范例 方便表单验证
php 正则 不包含某字符串的正则表达式
用正则表达式表示不包含2950的字符串
用正则删除不包含某个字符串的行的代码
用正则表达式来判断素数的代码
关于表格的正则表达式讨论(表格)
[原创]通过脚本清空标签p中的class名和style
[原创]VBS中的正则表达式的用法大全
去html代码的正则 推荐
正则表达式的应用

正则表达式简单的检查输入email是否合法程序


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

function chkEmail(email)
on error resume next
dim i,l,pos1,pos2
chkEmail=true
if isnull(email) then chkEmail=false:exit function
pos1= instr(email,"@")
pos2=instrRev(email,".")
if not(pos1>0) or not (pos2>0) or pos1>pos2 then
chkEmail=false
end if
if err.number<>0 then err.clear
end function