asp正则表达式验证邮箱地址

【ASP编程】

下载

新闻

文章

使用正则表达式可以方便地检查用户输入的信息是否符合指定的标准。本节实例演示如何利用正则表达式，对用户输入的E-Mail的合法性进行检测。

使用正则表达式可以方便地检查用户输入的信息是否符合指定的标准。本节实例演示如何利用正则表达式，对用户输入的E-Mail的合法性进行检测。E-Mail地址的格式一般为：“(\w)+[@]{1}(\w)+[.]{1}(\w)+”，其中，“\w”表示任意有效字符串，允许含下划线；[@]{1}表示只出现一个”@”字符；“[.]{1}”同样表示只出现一个“.”；“+”则表示可以匹配前一个字符一次或者多次。

正则表达式演示代码：

Function CheckEmail(email) 
    Dim regEx, blvar
	Dim strptn
	'//正则表达式
	strptn="(\w)+[@]{1}(\w)+[.]{1}(\w)+"
	Set regEx = New RegExp  
    regEx.Pattern = strptn
    regEx.IgnoreCase = true 
    regEx.Global=True  
	'//验证输入Email地址是否匹配
    blvar = regEx.test(email)
	CheckEmail=blvar
    if blvar then
      msgbox "输入的Email地址合法:"&email
    else
      msgbox "输入的Email地址不合法:"&email
    end if
  End Function 
  sub check_OnClick()
    '//调用函数验证输入
     CheckEmail document.Email("email").value
  End sub