一种新的UBB转换程序版本
注意:使用()模式将知道regexp内存搜索的价值,1美元是第一(),和其余的类比。但2美元不是语法的5版本支持Vbscript.dll命令。我检查了我的机器上的版本(安装IE 5.5)发现的版本是5.50.4629 Vbscript.dll命令,和最后修改日期是12月25日。这个版本支持语法像1美元,一个简单的改进,使正则表达式的功能逐渐接近于Perl的正则表达式
函数的UBBCode(strcontent)
昏暗的objregexp
集objregexp = new RegExp
objregexp.ignorecase =真
ObjRegExp。全球=真
URL
ObjRegExp。模式=( } { URL)(http: / / +)( { /网址 })
strcontent = objregexp。取代(strcontent,)
ObjRegExp。模式=( } { URL()+)( { /网址 })
strcontent = objregexp。取代(strcontent,)
电子邮件
ObjRegExp。模式=( } {电子邮件)( + +)( { /电子邮件 })
strcontent = objregexp。取代(strcontent,)
ObjRegExp。模式=( { IMG })( +)( { / IMG })
strcontent = objregexp.replace(strcontent,)
ObjRegExp。模式=( {引用})(1)( { /报价 })
strcontent = objregexp.replace(strcontent,脸= 宋体,宋体>报价:2美元)
ObjRegExp。模式=( {我 })(1)( { / })
strcontent = objregexp.replace(strcontent,2美元)
ObjRegExp。模式=( } { B)(1)( { / B })
strcontent = objregexp.replace(strcontent,2美元)
集objregexp =没有
ubbcode = strcontent
端功能
= - =====================
Sub UBBCode {
我的美元后=移;
美元的~后= /( } { URL)(http: / / +)( { /网址 })/目标= _blank > 2美元/ ISG;
美元的~后= /( } { URL()+)( { /网址 })/目标= _blank > 2美元/ ISG;
美元的~后= /( } {电子邮件)( + +)( { /电子邮件 }) / href = mailto:2美元2美元/ ISG >;
如果(($ ubbimages情商)($ overrideimages NE是)){
美元的~后= /( { IMG })( +)( { / IMG }) / / ISG;
}
美元的~后= /( {引用})(1)( { /报价 }) /面=Verdana Arial >报价:2美元/ ISG ;
美元的~后= /( {我 })(1)( { / }) / / ISG 2美元;
美元的~后= /( } { B)(1)( { / B }) / / ISG 2美元;
收益(元后);
}