当字符串中出现嵌套的具有相似转换规律的UBB代码时，如：[ b ]...[ /b ] [ i ]...[ /i ]  [ u ]...[ /u ]代码的相互嵌套。我们可以用不同的正则表达式一次一次转换，但如果用一个正则表达式一次完成转换，实现起来往往很困难，因为我们无法预料字符串中UBB代码嵌套的顺序和层数及出现的次数。因此我们根据其具有相似转换规律的这一特性，写出一个通用正则表达式，用函数的递归（即自己调用自己）来实现...

有些朋友会说：用那么复杂干什么？直接把 [ 转换成 < ，把 ] 转换成 > ，不就得了。NO！非得用正则实现不可，不然用户输个[x]...[x]，不也就转换成<x>...</x>了...

本代码还能实现新的类似的UBB代码的扩充，只需要在正则表达式的(u|i|b)内加上新的UBB代码即可，用|进行分隔...
VBS代码如下：<SCRIPT LANGUAGE="VBSCRIPT"> str="[i]xxx[b]yyy[/b]zzz[/i]" document.write "例一：" & UBBcode(str) & "<br>" str="[u][b]aaa[i]bbb[/i]ccc[/b][/u]" document.write "例二：" & UBBcode(str) & "<br>" str="[i][u]aaa[/u][b]bbb[u]ccc[/u][/b][/i][b]123[/b][i]xxx[u]yyy[/u]zzz[/i]" document.write "例三：" & UBBcode(str) Function UBBcode(instring) Dim objRegExp'定义变量 Set objRegExp = new RegExp'建立正则对象 objRegExp.IgnoreCase = True'忽略大小写 objRegExp.Global = True'设定全局可用性 objRegExp.Pattern = "\[(u|i|b)\](.*?)\[\/\1\]"'通用正则表达式 If objRegExp.test(instring) Then'判断是否还有需要转换的UBB代码 outstr = objRegExp.replace(instring,"<$1>$2</$1>")'转换 UBBcode = UBBcode(outstr)'递归并返回转换的中间结果 Else UBBcode = instring'返回转换的最后结果 End If End Function </SCRIPT>
 运行代码 拷贝代码 保存代码 [可先修改部分代码再运行;请先检查代码确定安全]
JS代码如下：<SCRIPT LANGUAGE="JAVASCRIPT"> str="[i]xxx[b]yyy[/b]zzz[/i]"; document.write("例一：" + UBBcode(str) + "<br>"); str="[u][b]aaa[i]bbb[/i]ccc[/b][/u]"; document.write("例二：" + UBBcode(str) + "<br>"); str="[i][u]aaa[/u][b]bbb[u]ccc[/u][/b][/i][b]123[/b][i]xxx[u]yyy[/u]zzz[/i]"; document.write("例三：" + UBBcode(str)); function UBBcode(instring){ Re = /\[(u|i|b)\](.*?)\[\/\1\]/ig;//通用正则表达式,忽略大小写,全局可用 if (Re.test(instring)){//判断是否还有需要转换的UBB代码 outstr = instring.replace(Re,"<$1>$2</$1>");//转换 UBBcode(outstr);//递归 return(outstr);//返回转换的中间结果 } else return(instring);//返回转换的最后结果 } </SCRIPT>
 运行代码 拷贝代码 保存代码 [可先修改部分代码再运行;请先检查代码确定安全]