小妹我是想利用正则表达式来判断一个输入Email地址是否是合法的,但是就无论我输入的值是否是一个合法

的Email,返回的值都是flase,都不知道是哪段代码错了,请大虾们帮帮小妹吧! 问题阐述如下: 1.asp的form表单代码如下,作用是向textfield里面输入一个Email地址,提交给2.asp页面去验证 <form name="form1" method="post" action="2.asp"> <p> <input name="textfield" type="text" size="30"> </p> <p> <input type="submit" name="Submit" value="提交"> </p> </form>

2.asp <% Function CheckExp(patrn, strng) Dim regEx, Matches ' 建立变量。 Set regEx = New RegExp ' 建立正则表达式。 regEx.Pattern = patrn ' 设置模式。 regEx.IgnoreCase = true ' 设置是否区分字符大小写。 regEx.Global = True ' 设置全局可用性。 Matches = regEx.test(strng) ' 执行搜索。 CheckExp = Matches

response.write "你输入的是:"&a&"<br>" '输出a的值,也就是在1.asp里输入textfield的值

response.Write "是否符合要求:"&matches '输出matches的值(true/flase),若1.asp里输入textfield的值是一个合法的Email地址的话就输出True,否

则输出false,这里就是问题所在之处,无论我在1.asp中输入textfield的值是不是一个合法的Email地址,输出

结果都是false,不知道为什么会是这样,难道是下面的正则表达式错误了吗?

End Function %>

<% Dim a a=request.Form("textfield") call CheckExp("\w+([-+.]\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*" ,"a") '这里是利用正则表达式做为参

来调用上面的CheckExp(patrn,strng)来判断a(1.asp中输入的Email地址) %>

大虾们,为了解决这个问题我在网上搜索了很多相关的文章,判断Email地址的正则表达式也换了不少,还是不

成功,请大虾们帮帮忙,在此先谢了.