将HTML转成UBB代码的小脚本

将HTML转成UBB代码的小脚本只写了几个常用的标签，如果要添加其他标签，按照已有的正则照猫画虎（存储于剪切板的超文本和源文件有可能是不同的！！也就是说浏览器已经对原有 html 进行了规范化）<script Language="JavaScript1.2">//coded by windy_sk <[email protected]> 20031218function html_trans(str) {str = str.replace(/r/g,"");str = str.replace(/on(load|click|dbclick|mouseover|mousedown|mouseup)="[^"]+"/ig,"");str = str.replace(/<script[^>]*?>([wW]*?)</script>/ig,"");str = str.replace(/<a[^>]+href="([^"]+)"[^>]*>(.*?)</a>/ig,"n$2n");str = str.replace(/<font[^>]+color=([^ >]+)[^>]*>(.*?)</font>/ig,"n$2n");str = str.replace(/<img[^>]+src="([^"]+)"[^>]*>/ig,"nn");str = str.replace(/<([/]?)b>/ig,"[$1b]");str = str.replace(/<([/]?)strong>/ig,"[$1b]");str = str.replace(/<([/]?)u>/ig,"[$1u]");str = str.replace(/<([/]?)i>/ig,"[$1i]");str = str.replace(/&nbsp;/g," ");str = str.replace(/&amp;/g,"&");str = str.replace(/&quot;/g,""");str = str.replace(/&lt;/g,"<");str = str.replace(/&gt;/g,">");str = str.replace(/<br>/ig,"n");str = str.replace(/<[^>]*?>/g,"");str = str.replace(/[url=([^]]+)]n()n[/url]/g,"$2");str = str.replace(/n+/g,"n");return str;}function trans(){var str = "";rtf.focus();rtf.document.body.innerHTML = "";rtf.document.execCommand("paste");str = rtf.document.body.innerHTML;if(str.length == 0) {alert("剪切版不存在超文本数据！");return "";}return html_trans(str);}</script><textarea style="width:100%; this.focus();}"></textarea><br /><iframe scrolling="no" id="rtf" src="about:blank" MARGINHEIGHT="0" MARGINWIDTH="0" style="width:0px; "></iframe><input type="button" value="转换剪切版超文本数据" onclick="document.getElementById('text').value += trans()"><input type="checkbox" id="x_paste"> <label for="x_paste">启用超文本粘贴转换</label><script>rtf.document.designMode="On";</script>
[Ctrl+A 全部选择 提示：你可先修改部分代码，再按运行]使用说明在别的网页中选择HTML内容，比如有链接，或者颜色的拷贝。 点击运行代码按钮 直接点击转换 出来的就是论坛专用的 ubb 代码了。
php爱好者站 http://www.phpfans.net PHP|MySQL|javascript|ajax|html.