ASP中的正则表达式

正则表达式用于字符串处理、表单验证等场合，实用高效。现将一些常用的表达式收集于此，以备不时之需。


匹配中文字符的正则表达式： [/u4e00-/u9fa5]
评注：匹配中文还真是个头疼的事，有了这个表达式就好办了

匹配双字节字符(包括汉字在内)：[^/x00-/xff]
评注：可以用来计算字符串的长度（一个双字节字符长度计2，ASCII字符计1）

匹配空白行的正则表达式：/n/s*/r
评注：可以用来删除空白行

匹配HTML标记的正则表达式：<(/S*?)[^>]*>.*?<//1>|<.*? />
评注：网上流传的版本太糟糕，上面这个也仅仅能匹配部分，对于复杂的嵌套标记依旧无能为力

匹配首尾空白字符的正则表达式：^/s*|/s*$
评注：可以用来删除行首行尾的空白字符(包括空格、制表符、换页符等等)，非常有用的表达式

匹配Email地址的正则表达式：/w+([-+.]/w+)*@/w+([-.]/w+)*/./w+([-.]/w+)*
评注：表单验证时很实用

匹配网址URL的正则表达式：[a-zA-z]+://[^/s]*
评注：网上流传的版本功能很有限，上面这个基本可以满足需求

匹配帐号是否合法(字母开头，允许5-16字节，允许字母数字下划线)：^[a-zA-Z][a-zA-Z0-9_]{4,15}$
评注：表单验证时很实用

匹配国内电话号码：/d{3}-/d{8}|/d{4}-/d{7}
评注：匹配形式如 0511-4405222 或 021-87888822

匹配腾讯QQ号：[1-9][0-9]{4,}
评注：腾讯QQ号从10000开始

匹配中国邮政编码：[1-9]/d{5}(?!/d)
评注：中国邮政编码为6位数字

匹配身份证：/d{15}|/d{18}
评注：中国的身份证为15位或18位

匹配ip地址：/d+/./d+/./d+/./d+
评注：提取ip地址时有用

匹配特定数字：
^[1-9]/d*$ //匹配正整数
^-[1-9]/d*$ //匹配负整数
^-?[1-9]/d*$ //匹配整数
^[1-9]/d*|0$ //匹配非负整数（正整数 + 0）
^-[1-9]/d*|0$ //匹配非正整数（负整数 + 0）
^[1-9]/d*/./d*|0/./d*[1-9]/d*$ //匹配正浮点数
^-([1-9]/d*/./d*|0/./d*[1-9]/d*)$ //匹配负浮点数
^-?([1-9]/d*/./d*|0/./d*[1-9]/d*|0?/.0+|0)$ //匹配浮点数
^[1-9]/d*/./d*|0/./d*[1-9]/d*|0?/.0+|0$ //匹配非负浮点数（正浮点数 + 0）
^(-([1-9]/d*/./d*|0/./d*[1-9]/d*))|0?/.0+|0$ //匹配非正浮点数（负浮点数 + 0）
评注：处理大量数据时有用，具体应用时注意修正

匹配特定字符串：
^[A-Za-z]+$ //匹配由26个英文字母组成的字符串
^[A-Z]+$ //匹配由26个英文字母的大写组成的字符串
^[a-z]+$ //匹配由26个英文字母的小写组成的字符串
^[A-Za-z0-9]+$ //匹配由数字和26个英文字母组成的字符串
^/w+$ //匹配由数字、26个英文字母或者下划线组成的字符串
评注：最基本也是最常用的一些表达




==================================================


匹配中文字符的正则表达式： [/u4e00-/u9fa5]

匹配双字节字符(包括汉字在内)：[^/x00-/xff]

应用：计算字符串的长度（一个双字节字符长度计2，ASCII字符计1）

String.prototype.len=function(){return this.replace([^/x00-/xff]/g,"aa").length;}

匹配空行的正则表达式：/n[/s| ]*/r
匹配HTML标记的正则表达式：/<(.*)>.*<///1>|<(.*) //>/

匹配首尾空格的正则表达式：(^/s*)|(/s*＄)
应用：javascript中没有像vbscript那样的trim函数，我们就可以利用这个表达式来实现，如下：
String.prototype.trim = function()
{
return this.replace(/(^/s*)|(/s*＄)/g, "");
}

利用正则表达式分解和转换IP地址：

下面是利用正则表达式匹配IP地址，并将IP地址转换成对应数值的Javascript程序：

function IP2V(ip)
{
re=/(/d+)/.(/d+)/.(/d+)/.(/d+)/g //匹配IP地址的正则表达式
if(re.test(ip))
{
return RegExp.＄1*Math.pow(255,3))+RegExp.＄2*Math.pow(255,2))+RegExp.＄3*255+RegExp.＄4*1
}
else
{
throw new Error("Not a valid IP address!")
}
}
不过上面的程序如果不用正则表达式，而直接用split函数来分解可能更简单，程序如下：

var ip="10.100.20.168"
ip=ip.split(".")
alert("IP值是："+(ip[0]*255*255*255+ip[1]*255*255+ip[2]*255+ip[3]*1))

匹配Email地址的正则表达式：/w+([-+.]/w+)*@/w+([-.]/w+)*/./w+([-.]/w+)*

匹配网址URL的正则表达式： http://([/w-]+/.)+[/w-]+(/[/w- ./?%&=]*)? 

在vb script 中功能最强大也最灵活的的要数正则表达式（RegExp对象）和类（class）了。

我也是在不久前才完全的懂得正则表达式的。

-------------------正则表达式的所有内容-----------------------------

RegExp属性
Global
IgnoreCase
Pattern

RegExp方法
Execute
Replace
Test

RegExp对象
Match
Match属性
FirstIndex
Length
Value

RegExp集合
Matches 
SubMatches

------------------这些内容均包含在置顶帖子中的vb script 手册中-----------------------------

我在学习正则表达式的时候根本不知何谓正则表达式、对他的理解也非常模糊，以至于接触了很长时间才懂得，虽然vbs手册中有很详细地解释。

正则表达式我个人将其理解为用来搜索文本然后然后对搜索结果作处理的一些列动作。

先来看一段大家所熟知的ubb代码
function ubb(str)
Dim rex,match,matches ' 建立变量。
Set rex= New RegExp ' 建立规范表达式。
rex.IgnoreCase = True ' 设置是否区分字母的大小写。
rex.Global = True ' 设置全程性质。
rex.Pattern = "/［url=(.*)］(.*)/［//url］" ' 设置模式。官方是这样解释的，我认为我们应该换一种叫法：搜索方法，这样我们才便于理解。
ubb = rex.replace(str,"<a href=$1>$2</a>") '将我们搜索到的内容替换
'我们在设定搜索的时候用到了两个括号，也就是说我们将只需要用到这两个括号中的内容，这两个括号中的内容在替换的时候将会用$1(第一个括号中的内容)和$2(第二个括号中的内容)来代替。
end function
'用法
dim text
text="［url=http://www.aaa.com］link［/url］"
document.write ubb(text) '输出文本并调用正则表达式
'如果在asp中使用请将document替换为response

上面是一个简单的正则演示，在这个演示中我们只用了一行内容，用方法replace在替换文字的时候只处理一行中的第一个ubb代码头和最后的一个ubb代码的尾，如下：
［url=http://www.aaa.com］link［/url］ ［url=http://www.aaa.com］link［/url］
将会被替换为<a href=http://www.aaa.com]link[/url] [url=http://www.aaa.com></a>，这个结果可不是我们要的，
也就是说我们必须在大量替换搜索内容前将要搜索的全部的文本或者字符串作处理。处理的结果就是要保证每一行只能存在一个相应的代码。这点非常重要，在我学习的时候一直搞不明白为什么？后来才知道是这个原因。

在上面的一个示例中我们用到了正则表达使得所有属性以及replace的方法，下来我们来看一下有关于方法Execute，对象Match及所有属性，集合Matches 的一个官方的示例
Function RegExpTest(patrn, strng)
Dim regEx, Match, Matches ' 建立变量。
Set regEx = New RegExp ' 建立正则表达式。
regEx.Pattern = patrn ' 设置模式。即：搜索方法
regEx.IgnoreCase = True ' 设置是否区分大小写。
regEx.Global = True ' 设置全程可用性。
Set Matches = regEx.Execute(strng) ' 执行搜索。我们可以理解为被搜索的字符串
For Each Match in Matches ' 遍历 Matches 集合。
RetStr = RetStr & "匹配" & Match' 注意，在官方提供的示例中这里是错误的，
这里是被匹配的名称
RetStr = RetStr & "位于" & Match.FirstIndex & "。"'这里是匹配内容的第一个字符，该数字从0开始
RetStr = RetStr & "匹配的长度为"& Match.Length & "个字符。" 这里不用解释了吧？
RetStr = RetStr & vbCRLF '这里是换行
Next
RegExpTest = RetStr
End Function
document.write(RegExpTest("is.", "IS1 is2 IS3 is4"))
'如果在asp中使用请将document替换为response 
在这个示例中我们可以看到方法Execute和对象Match是使用在集合Matches中的，Match和Matches是作为变量来使用的，为了我们很容易得看懂它，我们没有必要将他们换名字。关于对象Match的属性，我在上面的示例中都做了注释了。

最后我们来看集合SubMatches，代码如下：（由于官方的这段代码很含糊，所以我修改了一下）
Function SubMatchTest(inpStr)
Dim Re, Match, Matches
Set Re = New RegExp
Re.Pattern = "(/w+)@(/w+)/.(/w+)"
Set Matches = Re.Execute(inpStr)
Set Match = Matches(0) '由于这里没有使用循环，所以只能搜索一次。只匹配搜索到的第一个内容
retStr = "电子邮件地址是： " & Match & vbNewline ' 这里是匹配的内容
retStr = retStr & "电子邮件别名是： " & Match.SubMatches(0) '第一个括号中的内容
retStr = retStr & vbNewline
retStr = retStr & "组织是： " & Match. SubMatches(1)'第二个括号中的内容
SubMatchTest = retStr
End Function
document.write(SubMatchTest("请写信到 dragon@xyzzy.com 。谢谢！"))
'如果在asp中使用请将document替换为response
在上面的这段代码中我们看到了对象Match和集合Matches的另外一种用法，由此可见所有的集合均可以用这种方法，就像实用数组一样。看完上面的代码有些朋友可能想到既然在属性Pattern中已经提供了$1$2.....$n这种方法，为什么还要存在集合SubMatches呢？实际上在我们使用证则表达式的时候可能搜索要匹配的内容或字符串很长，然而我们还要对搜索到匹配的字符串进行进一步的处理，而$又不能实现这个，于是便有了集合SubMatches。

到这里有关于VBScript的正则表达式的内容就全部说完了，上面的3个代码均可以放在＜SCRIPT Language="VBScript"＞＜/SCRIPT＞标签中使用也可以放在ASP中执行。