判断输入的Email地址格式是否正确

青年求知发布于 2008-12-09 09:14， 1405 次点击

请问：我想判断从文本框中输入的Email地址格式是否正确应该怎么实现？

3 回复

hmhz2008-12-09 09:36

使用正则
<%
Function isemail(strng)
isemail = false
Dim regEx,Match
Set regEx = New RegExp
RegEx.Pattern = "^\w+((-\w+)|(.\w+))*@[A-Za-z0-9]+((.|-)[A-Za-z0-9]+)*.[A-Za-z0-9]+$"
RegEx.IgnoreCase = True
Set Match = RegEx.Execute(strng)
if match.count then isemail = true
End Function

if not isemail(Email) then
response.write "Email格式不对，请重新输入！"
end if
%>

青年求知2008-12-09 15:06

回复第2楼 hmhz 的帖子

谢谢。

anlige2008-12-09 15:07

var reg_email=/^[0-9A-Za-z_]{1,}@[0-9A-Za-z_]{1,}\.[0-9A-Za-z]{1,}$/;
js正则...