1. 论坛系统升级为Xenforo,欢迎大家测试!
    排除公告

HTML超文本剪切转换UBB编辑器

本帖由 小叶2006-04-20 发布。版面名称:前端开发

  1. 小叶

    小叶 New Member

    注册:
    2005-09-04
    帖子:
    17,941
    赞:
    33
    HTML:
    <html>
    <head>
    <title>HTML超文本剪切转换UBB编辑器</title>
    <meta name="description" content="HTML超文本剪切转换UBB编辑器">
    <meta http-equiv="Content-Type" content="text/html; charset=gb2312">
    <META http-equiv=Page-Enter content=RevealTrans(Duration=1,Transition=10)>
    <META content="MSHTML 6.00.2800.1400" name=GENERATOR>
    <style>BODY {
    	FONT-SIZE: 9pt; COLOR: black
    }
    TD {
    	FONT-SIZE: 9pt; COLOR: black
    }
    TH {
    	FONT-SIZE: 9pt; COLOR: black
    }
    A {
    	TEXT-DECORATION: none
    }
    A:hover {
    	COLOR: blue
    }
    INPUT {
    	WIDTH: 50pt; HEIGHT: 22px; BACKGROUND-COLOR: #8addea
    }
    </style>
    
    <script>
    //self.moveTo(0,0)
    //self.resizeTo(screen.availWidth,screen.availHeight)
    </script>
    
    <script language=Javascript>
    <!--
    function SymError()
    {
      return true;
    }
    window.onerror = SymError;
    //-->
    </script>
    <script language=Javascript1.2>
    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="ed2k([^"]+)"[^>]*>(.*?)<\/a>/ig,"\n[EMULE]ed2k$1[/EMULE]\n");
    	str = str.replace(/<a[^>]+href="([^"]+)"[^>]*>(.*?)<\/a>/ig,"\n[url=$1]$2[/url]\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(/&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(\[img\]\1\[\/img\])\n\[\/url\]/g,"$2");
    	str = str.replace(/\n+/g,"\n");	
    	//str = str.replace(/<a[^>]+href="," ")
    	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>
    </head>
    <body vLink="#000080" aLink="#800080" link="#000080" bgColor="#C0C0C0" leftMargin="2" topMargin="2">
    <div align=center>
    </div>
    <div align=center>
    <br /><br /><br />
    <p><font size="3" color="#000080">HTML超文本剪切转换UBB编辑器</font></p></div>
    <div style="z-index: 1000; position:absolute; left:0px; top:0px; width:100%; height:22; background-color: #C0C0C0;">
    <br /><br /><font color="red">使用前见下面的详细说明</font></div> 
          <table width="80%" border="5" align="center" cellpadding="20" cellspacing="0">
            <tr>
    		<td valign="top" bgcolor="#C0C0C0" class="right">
              <textarea cols="100" rows="23" class="textarea" id="bbcodetext" onbeforepaste="if(document.getElementById('x_paste').checked){window.clipboardData.setData('text',trans());this.focus();}">
    		  </textarea><br/>
              <IFRAME id=rtf style="WIDTH: 0px; HEIGHT: 0px" marginWidth=0 marginHeight=0 src="about:blank" scrolling=no></IFRAME>
              <label for="x_paste"></label>
              <table width="100%" border="3" cellpadding="0" cellspacing="0" bordercolor="red" bgcolor="green">
                <tr>
                  <td align="center">
                    <input type="reset" value="清   空" onClick="document.getElementById('bbcodetext').value ='' ">
                    &nbsp;</td><td align="center">&nbsp;
                    <input name="button" type=button onClick="document.getElementById('bbcodetext').value = trans()" value='转   换'>&nbsp;&nbsp;&nbsp;
                    <input name="button" type=button onClick="document.getElementById('bbcodetext').value += trans()" value='追加转换'>
                    &nbsp;</td>
    				<td align="center">&nbsp;
    				<script language="javascript">
    				  function CopyTextToPastBoad(v_TextboxName) {
    					if (document.all(v_TextboxName).value == '') {
    					  alert('提示,文本框中没有代码!');
    					  return false;
    					}
    					document.all(v_TextboxName).select();
    					js = document.all(v_TextboxName).createTextRange();
    					//this.select();
    					//js=this.createTextRange();
    					js.execCommand('Copy');
    					alert('成功,已将文本框中的代码复制到剪切板上!');
    				  }
    				</script>
                    <input name="button" type=button onClick="CopyTextToPastBoad('bbcodetext')" value='剪   切'>
                  </td></tr>
              </table>
              <script>rtf.document.designMode="On";</script></td>
            </tr>
          </table>
    </td>
      </tr>
    </table>
    
    <br />
    <blockquote>
    <table width="700" border="0" align="center" cellpadding="0" cellspacing="0" style="font-size:12px;">
      <tr><td height=20><b>功能说明:</b><br><br><li>由于本论坛及所有的DV论坛程序对于HTML代码太苛刻,稍有错误(代码不全,或者带有论坛禁用的一些代码)就会显示乱码。此工具就是为了解决这个问题而制作的。</td></tr>
      <tr><td>&nbsp;&nbsp;&nbsp;&nbsp;<li>在转贴其它论坛上的帖子时,如果帖子中含有较多的图片及链接时,使用本转换工具可以方便地对原帖进行转换,转换为几乎所有网站都能接受的UBB代码。再长的贴子转贴时间小于一分钟!</td></tr>
      <tr><td height=20><br><b>使用方法:</b></td></tr>
      <tr><td>&nbsp;&nbsp;&nbsp;&nbsp;<li>复制(可选中内容后按<font color="red">CTRL+C</font>)你想转帖的内容(包括文字、图片和链接等)。</td></tr>
      <tr><td>&nbsp;&nbsp;&nbsp;&nbsp;<li>转到本页面,按一下本页面的“<font color="red">转换</font>”按钮</td></tr>
      <tr><td>&nbsp;&nbsp;&nbsp;&nbsp;<li>转换后的代码即会出现在上面的文本框中。<br>    其中图片变成了[img]xxx...x[/img],网址链接变成了[url]http://xxx...x[/url]</td></tr>
      <tr><td>&nbsp;&nbsp;&nbsp;&nbsp;<li>点击“<font color="red">剪切</font>”,将文本框中的代码帖复制下来,用于发帖。</td></tr>
      <tr><td height=20><br><b>注意事项:</b></td></tr>
      <tr><td>&nbsp;&nbsp;&nbsp;&nbsp;<li><font color="blue">选择内容复制后不用粘贴到上面的框里,直接按“转换”按钮即可。</font><br><br>
    <li>"追加转换"是多次的内容转换到一起时使用按纽,即后一次转换的内容不会覆盖前面已转换的内容。而直接按"转换"时,前一次已转换的内容则会被后来的内容所覆盖。<br><br>
    <li>当在论坛中发的帖子出现乱码时,你可以先点击乱码帖下方的"运行代码",再复制弹出的窗口中的内容,在这里点击"转换",就能将你不正确的代码自动添加进去,再剪切下来,重新编辑你的发帖(清空原帖内容)即可。
    </td></tr>
    </table>
    </blockquote>
    <br />
    </center>
    </body>
    </html>
     
  2. 老林

    老林 New Member

    注册:
    2005-09-06
    帖子:
    10,580
    赞:
    36
  3. 小叶

    小叶 New Member

    注册:
    2005-09-04
    帖子:
    17,941
    赞:
    33
    忘记说了,还支持emule的地址,我修改的。:(
     
  4. 链链不舍

    链链不舍 New Member

    注册:
    2006-01-14
    帖子:
    386
    赞:
    2
    这个实用
     
  5. haiyanli

    haiyanli New Member

    注册:
    2006-04-18
    帖子:
    46
    赞:
    0