ubb代码转换为html

操作方法

  • 01

    记得以前贴过一个ubb代码转换为html格式的代码,前几天读ubb的源代码。所以有了这个新的版本。注意,这个版本可能还不能正常使用,详细见注。 这段代码将用户输入的ubb代码转化为html格式,注意,需要Script Engine 5.0的支持(使用了RegExp对象) 注:pattern中使用()将知道regexp记忆搜索到的值,$1是第一个(),其余类推。但$2的语法并不被5.0版本的vbscript.dll所支持,我检查了自己机器上的版本(安装过ie 5.5),发现vbscript.dll的版本为5.50.4629,最后修改日期为12月25日。该版本支持$1之类的语法,这个简单的改进使regexp的功能逐渐与perl的正则表达式靠近 function UBBCode(strContent) dim objRegExpSet objRegExp=new RegExpobjRegExp.IgnoreCase =trueobjRegExp.Global=True'urlobjRegExp.Pattern="(\[URL\])(http:\/\/\S+?)(\[\/URL\])"strContent= objRegExp.Replace(strContent,"<A HREF=""$2"" TARGET=_blank>$2</A>")objRegExp.Pattern="(\[URL\])(\S+?)(\[\/URL\])"strContent= objRegExp.Replace(strContent,"<A HREF=""http://$2"" TARGET=_blank>$2</A>") 'emailobjRegExp.Pattern="(\)(\S+\@\S+?)(\[\/EMAIL\])"strContent= objRegExp.Replace(strContent,"<A HREF=""mailto:$2"">$2</A>") objRegExp.Pattern="(\[IMG\])(\S+?)(\[\/IMG\])"strContent=objRegExp.Replace(strContent,"<IMG SRC=""$2"">") objRegExp.Pattern="(\[QUOTE\])(.+?)(\[\/QUOTE\])"strContent=objRegExp.Replace(strContent,"<BLOCKQUOTE><font size=1 face=""Verdana, Arial"">quote:</font><HR>$2<HR></BLOCKQUOTE>") objRegExp.Pattern="(\[i\])(.+?)(\[\/i\])"strContent=objRegExp.Replace(strContent,"<i>$2</i>") objRegExp.Pattern="(\[b\])(.+?)(\[\/b\])"strContent=objRegExp.Replace(strContent,"<b>$2</b>")set objRegExp=NothingUBBCode=strContent end function 原版的转化程序,摘自freeware版本的ubb论坛,可到 http://www.ultimatebb.com/ 下载(Perl CGI方式) sub UBBCode { my $ThePost = shift;$ThePost =~ s/(\[URL\])(http:\/\/\S+?)(\[\/URL\])/ <A HREF="$2" TARGET=_blank>$2<\/A> /isg; $ThePost =~ s/(\[URL\])(\S+?)(\[\/URL\])/ <A HREF="http:\/\/$2" TARGET=_blank>$2<\/A> /isg; $ThePost =~ s/(\)(\S+\@\S+?)(\[\/EMAIL\])/ <A HREF="mailto:$2">$2<\/A> /isg; if (($UBBImages eq "ON") && ($OverrideImages ne "yes")) {$ThePost =~ s/(\[IMG\])(\S+?)(\[\/IMG\])/ <IMG SRC="$2"> /isg;} $ThePost =~ s/(\[QUOTE\])(.+?)(\[\/QUOTE\])/ <BLOCKQUOTE><font size="1" face="Verdana, Arial">quote:<\/font><HR>$2<HR><\/BLOCKQUOTE>/isg; $ThePost =~ s/(\[i\])(.+?)(\[\/i\])/<i>$2<\/i>/isg; $ThePost =~ s/(\[b\])(.+?)(\[\/b\])/<b>$2<\/b>/isg; return ($ThePost); }

(0)

相关推荐

  • BBS中常用的UBB代码

    UBB代码是HTML的一个变种.一般情况下,你发布的信息允许你用HTML也就可以使用UBB代码.即使你的讨论区不能让你使用HTML,你也可以使用UBB代码. 目前可用的UBB代码 01 URL超级链接 ...

  • 怎么配置EmEditor详细图文教程

    很多功能,各大文本编辑器都会提供,而且,各大文本编辑器都会提供配置功能,让它更加适合您,而不是每个人的编辑器都一个样。然而,在配置方面,各 个编辑器却不尽相同。有些只提供简单的一些配置,有些配置功能却 ...

  • Emeditor怎么使用 Emeditor正则表达式大全

    经常用到EmEditor来编辑纯文本文档。最近接触了正则表达式,感受到其功能非常强大。 正则表达式实在包含的内容太多, 仅仅用一篇文章来涵盖是没可能的了, 所以我只是简要的做些介绍和基本的模式应用举例 ...

  • Excel中快速输入26个英文字母

    我们都知道,在Excel中用“填充柄”可以向表格中快速输入一些内置序列(如序数、日期等)和文本等。但不知您是试过没有,Excel竟然不能按顺序自动填充26个英文字母(是不是盖茨先生也不认可自已的母语! ...

  • img格式的含义

    img格式是镜像的一种。可以通过制作数据光盘或者使用虚拟光驱(如 WinMount)安装IMG数据文件。 img格式是制定css样式表的一种样式,对HTM中的图片属性进行修饰。 img格式是图片格式的 ...

  • Matlab2017b怎么安装?Matlab2017b详细安装图文步骤(附破解码及序列号)

    MathWorks推出了2017下半年的版本—MATLAB2017b(MATLAB R2017b),其中包括MATLAB和Simulink的若干新功能.六款新产品以及对其他86款产品的更新和修复补丁, ...

  • 把文字加密成数字的加密方法

    北方大多数城市今天都下雪了,你们那里下雪了没,大家注意保暖不要感冒了今天跟大家分享下如何使用CODE函数和CHAR函数,如何使用它们来构建自己密码区域CODE函数以及参数CODE函数:返回文本字符串中 ...

  • linux命令学习之gcc的使用

    本介绍在linux系统中所要使用到的系统命令,这里教大家学习linux命令之 gcc的使用 语法 gcc(选项)(参数) 选项 -o:指定生成的输出文件: -E:仅执行编译预处理: -S:将C代码转换 ...

  • Dreamweaver网页制作初级教程:初识DW

    现如今,网页制作以及建站成了人人需要掌握的技能,小编也从各方面得到需求说,以前有过PS的入门教程,现在能不能做一个DW的入门教程.那么从今天开始,小编将用一些时间,为大家带来DW的入门教程.只要能坚持 ...