页面导航：首页 → 网络编程 → 正则表达式 → 正文内容

将 html 转成 ubb代码的小脚本

发布：dxy 字体：[增加减小] 类型：转载

点击运行可以看到效果:

<script Language="JavaScript1.2"> 
//coded by windy_sk <windy_sk@126.com> 20031218 function html_trans(str) { 
    str = str.replace(/\r/g,""); 
    str = str.replace(/on(load|click|dbclick|mouseover|mousedown|mouseup)="[^"]+"/ig,""); 
    str = str.replace(/<script[^>]*?>([\w\W]*?)<\/script>/ig,""); 
     
    str = str.replace(/<a[^>]+href="([^"]+)"[^>]*>(.*?)<\/a>/ig,"\n$1\n"); 
     
    str = str.replace(/<font[^>]+color=([^ >]+)[^>]*>(.*?)<\/font>/ig,"\n[color=$1]$2[/color]\n"); 
     
    str = str.replace(/<img[^>]+src="([^"]+)"[^>]*>/ig,"\n[img]$1[/img]\n"); 
     
    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(/ /g," "); 
    str = str.replace(/&/g,"&"); 
    str = str.replace(/"/g,"\""); 
    str = str.replace(/</g,"<"); 
    str = str.replace(/>/g,">"); 
     
    str = str.replace(/
/ig,"\n"); 
    str = str.replace(/<[^>]*?>/g,""); 
    str = str.replace(/\[url=([^\]]+)\]\n(\[img\]\1\[\/img\])\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%; height:200px" id="text" class="textarea" onbeforepaste="if(document.getElementById('x_paste').checked){window.clipboardData.setData('text',trans());this.focus();}"></textarea>
 
<iframe scrolling="no" id="rtf" src="about:blank" MARGINHEIGHT="0" MARGINWIDTH="0" style="width:0px; height: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 全选提示:你可先修改部分代码,再按运行]

Tags：将 html 转成 ubb代码的小脚本

百度中搜索更多的关于将 html 转成 ubb代码的小脚本内容，或者用Google搜索相关更多

浏览次数：载入中... 打印本文关闭本文返回首页

0

上一篇文章：论坛UBB代码推荐
下一篇文章：asp去除html标记与空格的正则

文章评论

共有位脚本之家网友发表了评论我来说两句

同类文章

最近更新

热点排行