贴内增加html2UBB功能 for D4[12.29更新]

● 插件名称：贴内增加html2UBB功能

● 适用版本：Discuz! 4.0.0

● 相关修改：数据升级－无，模板修改－有

● 安装难度：易

● 插件作者：偶不是原作者，只是对此整理修改和详细说明

● 最后更新：2005-12-20

● 技术支持：http://bbs.jdwcn.com

● 程序说明：http://bbs.jdwcn.com/viewthread.php?tid=1840&extra=page%3D1

● 修改文件：
./include/common.js
./templates/default/viewthread.htm
./templates/default/forumdisplay.htm
./templates/default/post_bbinsert.htm

● 具体步骤：
修改common.js

查找

1. if(!document.onmouseover) {
   
2.         document.onmouseover = function(e) {
   
3.                 if (!e) showPopupText(window.event); else showPopupText(e);
   
4.         };
   
5. }

复制代码

下面添加

1. function trans(){
   
2.         var str = "";
   
3.         rtf.focus();
   
4.         rtf.document.body.innerHTML = "";
   
5.         rtf.document.execCommand("paste");
   
6.         str = rtf.document.body.innerHTML;
   
7.         if(str.length == 0) {
   
8.                 alert("剪切板不存在超文本数据！");
   
9.                 return "";
   
10.         }
    
11.         return html_trans(str);
    
12. }
    
13. function html_trans(str) {
    
14.         str = str.replace(/\r/g,"");
    
15.         str = str.replace(/on(load|click|dbclick|mouseover|mousedown|mouseup)="[^"]+"/ig,"");
    
16.         str = str.replace(/<script[^>]*?>([\w\W]*?)<\/script>/ig,"");
    
17.         
    
18.         str = str.replace(/<a[^>]+href="([^"]+)"[^>]*>(.*?)<\/a>/ig,"[url=$1]$2[/url]");
    
19.         
    
20.         str = str.replace(/<font[^>]+color=([^ >]+)[^>]*>(.*?)<\/font>/ig,"[color=$1]$2[/color]");
    
21.         
    
22.         str = str.replace(/<img[^>]+src="([^"]+)"[^>]*>/ig,"[img]$1[/img]");
    
23.         
    
24.         str = str.replace(/<([\/]?)b>/ig,"[$1b]");
    
25.         str = str.replace(/<([\/]?)strong>/ig,"[$1b]");
    
26.         str = str.replace(/<([\/]?)u>/ig,"[$1u]");
    
27.         str = str.replace(/<([\/]?)i>/ig,"[$1i]");
    
28.         
    
29.         str = str.replace(/ /g," ");
    
30.         str = str.replace(/&/g,"&");
    
31.         str = str.replace(/"/g,""");
    
32.         str = str.replace(/&lt;/g,"<");
    
33.         str = str.replace(/&gt;/g,">");
    
34.         
    
35.         str = str.replace(/<br>/ig,"\n");
    
36.         str = str.replace(/<[^>]*?>/g,"");
    
37.         str = str.replace(/\[url=([^\]]+)\](\[img\]\1\[\/img\])\[\/url\]/g,"$2");
    
38. 
    
39.         
    
40.         return str;
    
41. }
    
42. 
    
43. function trans(){
    
44.         var str = "";
    
45.         xydwcopy.focus();
    
46.         xydwcopy.document.body.innerHTML = "";
    
47.         xydwcopy.document.execCommand("paste");
    
48.         str = xydwcopy.document.body.innerHTML;
    
49.         if(str.length == 0) {
    
50.                 alert("剪切版不存在超文本数据！");
    
51.                 return "";
    
52.         }
    
53.         return html_trans(str);
    
54. }

复制代码

修改forumdisplay.htm

查找

1. {lang post_submit_hotkey}

复制代码

后面添加

1. &nbsp; &nbsp;
   
2. <IFRAME id=xydwcopy style="WIDTH: 0px; HEIGHT: 0px" marginWidth=0 marginHeight=0 src="about:blank" scrolling=no></IFRAME>
   
3. <span style=cursor:hand onclick="document.getElementById('message').value += trans()">[转换超文本数据]</span>        
   
4. <SCRIPT>   xydwcopy.document.designMode="On";     </SCRIPT>

复制代码

修改post_bbinsert.htm

查找

1. <a href="javascript:alipay()"><img src="{IMGDIR}/bb_alipay.gif" border="0" alt="{lang post_discuzcode_alipay}"></a>

复制代码

后面添加

1. <br><IFRAME id=xydwcopy style="WIDTH: 0px; HEIGHT: 0px" marginWidth=0 marginHeight=0 src="about:blank" scrolling=no></IFRAME>
   
2.         <span style=cursor:hand onclick="document.getElementById('message').value += trans()">[转换剪切板数据]</span>        
   
3.         <SCRIPT>
   
4.         xydwcopy.document.designMode="On";
   
5.         </SCRIPT>

复制代码

修改viewthread.htm

查找

1. {lang post_submit_hotkey}

复制代码

后面添加

1. &nbsp; &nbsp;
   
2. <IFRAME id=xydwcopy style="WIDTH: 0px; HEIGHT: 0px" marginWidth=0 marginHeight=0 src="about:blank" scrolling=no></IFRAME>
   
3. <span style=cursor:hand onclick="document.getElementById('message').value += trans()">[转换超文本数据]</span>        
   
4. <SCRIPT>   xydwcopy.document.designMode="On";     </SCRIPT>

复制代码

以后大家转帖时请注意新出现的 [转换剪切板数据] 链接,该链接能简单的实现 html2UBB 的功能,从而给

你的转帖带来方便.

使用说明:

首先，在相应的网页按住鼠标左键拖选你要复制的图片和文字，请尽量不要选无关的内容

接下来，在选中的部分点击鼠标右键--复制，此时，你选中的部分被复制到了剪切板

最后，将光标定位于本页文本框，按下本页“转换剪切板数据”按钮，你选中的内容将被转换成ubb代码




完

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝

还有热心的sdywd修改过的风格

喜欢的请看27楼

[ 本帖最后由 clon911 于 2005-12-29 19:23 编辑 ]

沙發，很小坐！

感谢斑竹鼓励

jimmyjimmyqqq 2005-12-20 21:49 威望 +5  原创内容
这个就5个..?而且● 插件作者：偶不是原作者，只是对此整理修改和详细说明
属于原创?

帮你顶一个!

[ 本帖最后由 Rinehart 于 2005-12-21 11:36 编辑 ]

恩 很不错 方便！ 顶了

支持下

顶了,不过我就8要这个了.还是要谢谢作者!

dingdi

楼主能否将“[转换剪切板数据]”改成图片显示啊！？