DDR爱好者之家 Design By 杰米
用js判断
复制代码 代码如下:
function is_email( str ){
p = /^([\w\.-]+)@([a-zA-Z0-9-]+)(\.[a-zA-Z\.]+)$/;
if(str.search(p) == -1){
return false;
}else{
return true;
}
}
用PHP判断
复制代码 代码如下:
function is_email($email){
$pattern="/^([\w\.-]+)@([a-zA-Z0-9-]+)(\.[a-zA-Z\.]+)$/i";//包含字母、数字、下划线_和点.的名字的email
if(preg_match($pattern,$email,$matches)){
return true;
}else{
return false;
}
}
用ASP判断
复制代码 代码如下:
function IsValidEmail(email)
dim names, name, i, c
IsValidEmail = true
names = Split(email, "@")
if UBound(names) <> 1 then
IsValidEmail = false
exit function
end if
for each name in names
if Len(name) <= 0 then
IsValidEmail = false
exit function
end if
for i = 1 to Len(name)
c = Lcase(Mid(name, i, 1))
if InStr("abcdefghijklmnopqrstuvwxyz_-.", c) <= 0 and not IsNumeric(c) then
IsValidEmail = false
exit function
end if
next
if Left(name, 1) = "." or Right(name, 1) = "." then
IsValidEmail = false
exit function
end if
next
if InStr(names(1), ".") <= 0 then
IsValidEmail = false
exit function
end if
i = Len(names(1)) - InStrRev(names(1), ".")
if i <> 2 and i <> 3 then
IsValidEmail = false
exit function
end if
if InStr(email, "..") > 0 then
IsValidEmail = false
end if
end function
复制代码 代码如下:
function is_email( str ){
p = /^([\w\.-]+)@([a-zA-Z0-9-]+)(\.[a-zA-Z\.]+)$/;
if(str.search(p) == -1){
return false;
}else{
return true;
}
}
用PHP判断
复制代码 代码如下:
function is_email($email){
$pattern="/^([\w\.-]+)@([a-zA-Z0-9-]+)(\.[a-zA-Z\.]+)$/i";//包含字母、数字、下划线_和点.的名字的email
if(preg_match($pattern,$email,$matches)){
return true;
}else{
return false;
}
}
用ASP判断
复制代码 代码如下:
function IsValidEmail(email)
dim names, name, i, c
IsValidEmail = true
names = Split(email, "@")
if UBound(names) <> 1 then
IsValidEmail = false
exit function
end if
for each name in names
if Len(name) <= 0 then
IsValidEmail = false
exit function
end if
for i = 1 to Len(name)
c = Lcase(Mid(name, i, 1))
if InStr("abcdefghijklmnopqrstuvwxyz_-.", c) <= 0 and not IsNumeric(c) then
IsValidEmail = false
exit function
end if
next
if Left(name, 1) = "." or Right(name, 1) = "." then
IsValidEmail = false
exit function
end if
next
if InStr(names(1), ".") <= 0 then
IsValidEmail = false
exit function
end if
i = Len(names(1)) - InStrRev(names(1), ".")
if i <> 2 and i <> 3 then
IsValidEmail = false
exit function
end if
if InStr(email, "..") > 0 then
IsValidEmail = false
end if
end function
DDR爱好者之家 Design By 杰米
广告合作:本站广告合作请联系QQ:858582 申请时备注:广告合作(否则不回)
免责声明:本站资源来自互联网收集,仅供用于学习和交流,请遵循相关法律法规,本站一切资源不代表本站立场,如有侵权、后门、不妥请联系本站删除!
免责声明:本站资源来自互联网收集,仅供用于学习和交流,请遵循相关法律法规,本站一切资源不代表本站立场,如有侵权、后门、不妥请联系本站删除!
DDR爱好者之家 Design By 杰米
暂无评论...
更新日志
2024年04月29日
2024年04月29日
- 群星《勃拉姆斯钢琴四重奏全集1-3》[FLAC/分轨][546.47MB]
- 飞跃虹镜什么时候上线 国服公测时间预测
- 七日世界阿尔法收容井在哪 位置及玩法介绍
- 原神4.6版本隐藏锚点开启攻略 从大海到大海成就
- dnf无敌药水什么名字
- 物华弥新换位置方法分享 物华弥新怎么换位置
- 物华弥新迷踪盘第15关怎么过 迷踪盘第15关通关方法
- win7怎么更换激活码,win7更改激活码
- 电脑怎么安装安卓系统不卡的,电脑怎么安装安卓系统软件
- 《天国拯救2》实体版已经在亚马逊等网站上开启预购
- Vandal爆料称 已获悉了Nintendo Switch 2的相关信息
- 打卡爱好者福音 收藏类游戏《Check in》登陆Steam
- 谈诗玲.2019-月情思曲【豪记】【WAV+CUE】
- 陈淑桦-试音陈淑桦24K金碟-正版原抓WAV+CUE.
- 韩宝仪《痴心的小妹》(24K黄金首版)WAV