正则表达式验证

近期，一些刚接触正则表达式的朋友们向我询问如何在ASP中使用它。虽然这个问题看似简单，但我觉得写一篇详细的文章会更有帮助。在此，我将详细解释如何在ASP中使用正则表达式，并分享一些基本的知识。

让我们先理解一下什么是正则表达式。正则表达式是一种强大的文本处理工具，它可以用来检查、替换符合某个模式的字符串。在ASP中，我们可以使用VBScript的RegExp对象来处理正则表达式。

假设我们有一个函数名为RegExpTest，它的作用是使用给定的正则表达式模式来测试输入的字符串是否符合该模式。此函数的主要部分如下：

假设函数代码为myfunc.asp：

```asp

<%

Function RegExpTest(patrn, strng)

Dim regEx, retVal

Set regEx = New RegExp ' 创建正则表达式对象

regEx.Pattern = patrn ' 设置正则表达式模式

regEx.IgnoreCase = False ' 设置是否区分大小写

retVal = regEx.Test(strng) ' 执行测试

RegExpTest = retVal ' 返回测试结果，符合为true，不符合为false

End Function

%>

```

接下来，我们可以使用表单收集用户输入的E-mail地址和电话号码，并在另一个页面（例如check.asp）进行验证。下面是验证页面的代码示例：

假设提交页面代码为mypage.asp：

```asp

```

假设验证页面代码为check.asp：

```asp

<%--include file="myfunc.asp"--%>

<%

tel = request.form("tel")

email = request.form("email")

dim founderr : founderr=false ' 初始化错误标记

' 验证电话号码的正则表达式，包含多种格式

if RegExpTest("(^[0-9]{3,4}\-[0-9]{3,8}$)|(^[0-9]{3,8}$)|(^\([0-9]{3,4}\)[0-9]{3,8}$)|(^0{0,1}13[0-9]{9}$)", tel)=false then

founderr=true

regshow=regshow & "