转贴工具v1.0.0 For 4.x (繁+简)

顺利安装成功，回来多谢老弟~~~

这东西网上到处都是，本以为楼主只是做了一下界面的优化，把它集合在 DZ 论坛里，可不想却还要导入插件数据，我的是 UTF-8 自然用不了。

唉～这东西本来就是独立的，何必搞那么复杂，以下是很久以前看见的源文件：

1. <script Language="JavaScript1.2">
   
2. //coded by windy_sk <[email]windy_sk@126.com[/email]> 20031218
   
3. 
   
4. function html_trans(str) {
   
5.         str = str.replace(/\r/g,"");
   
6.         str = str.replace(/on(load|click|dbclick|mouseover|mousedown|mouseup)="[^"]+"/ig,"");
   
7.         str = str.replace(/<script[^>]*?>([\w\W]*?)<\/script>/ig,"");
   
8.        
   
9.         str = str.replace(/<a[^>]+href="([^"]+)"[^>]*>(.*?)<\/a>/ig,"\n[url=$1]$2[/url]\n");
   
10.        
    
11.         str = str.replace(/<font[^>]+color=([^ >]+)[^>]*>(.*?)<\/font>/ig,"\n[color=$1]$2[/color]\n");
    
12.        
    
13.         str = str.replace(/<img[^>]+src="([^"]+)"[^>]*>/ig,"\n[img]$1[/img]\n");
    
14.        
    
15.         str = str.replace(/<([\/]?)b>/ig,"[$1b]");
    
16.         str = str.replace(/<([\/]?)strong>/ig,"[$1b]");
    
17.         str = str.replace(/<([\/]?)u>/ig,"[$1u]");
    
18.         str = str.replace(/<([\/]?)i>/ig,"[$1i]");
    
19.        
    
20.         str = str.replace(/&nbsp;/g," ");
    
21.         str = str.replace(/&/g,"&");
    
22.         str = str.replace(/"/g,""");
    
23.         str = str.replace(/&lt;/g,"<");
    
24.         str = str.replace(/&gt;/g,">");
    
25.        
    
26.         str = str.replace(/<br>/ig,"\n");
    
27.         str = str.replace(/<[^>]*?>/g,"");
    
28.         str = str.replace(/\[url=([^\]]+)\]\n(\[img\]\1\[\/img\])\n\[\/url\]/g,"$2");
    
29.         str = str.replace(/\n+/g,"\n");
    
30.        
    
31.         return str;
    
32. }
    
33. 
    
34. function trans(){
    
35.         var str = "";
    
36.         rtf.focus();
    
37.         rtf.document.body.innerHTML = "";
    
38.         rtf.document.execCommand("paste");
    
39.         str = rtf.document.body.innerHTML;
    
40.         if(str.length == 0) {
    
41.                 alert("剪切版不存在超文本数据！");
    
42.                 return "";
    
43.         }
    
44.         return html_trans(str);
    
45. }
    
46. </script>
    
47. 
    
48. <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><br />
    
49. <iframe scrolling="no" id="rtf" src="about:blank" MARGINHEIGHT="0" MARGINWIDTH="0" style="width:0px; height:0px;"></iframe>
    
50. <input type="button" value="转换剪切版超文本数据" onclick="document.getElementById('text').value += trans()">
    
51. <input type="checkbox" id="x_paste"> <label for="x_paste">启用超文本粘贴转换</label>
    
52. <script>
    
53. rtf.document.designMode="On";
    
54. </script>

复制代码

存为HTML文件就可以用。

[ 本帖最后由 KaijuanStudio 于 2006-1-15 20:16 编辑 ]

有没反安装码啊，骗子，骗子，全是骗子

原帖由 zb787 于 2006-1-17 13:35 发表
有没反安装码啊，骗子，骗子，全是骗子

骗甚麼?

原帖由 zb787 于 2006-1-17 13:35 发表
有没反安装码啊，骗子，骗子，全是骗子

呵呵，安装不好也不用说的这么难听嘛，毕竟这个东西还是不错的。

你不妨用最简单的方法来实现，把下面的代码保存为：convert.php，然后调用模板文件：convert.htm

1. <?
   
2. 
   
3. require "./include/common.inc.php";
   
4. 
   
5. @include DISCUZ_ROOT.'./forumdata/cache/plugin_convert.php';
   
6. 
   
7. $navtitle = '- 代码转换器';
   
8. 
   
9. include template('convert');
   
10. 
    
11. ?>

复制代码

支持樓主大的作品

這個我有需要

頂上~_~

頂上

這個很方便轉貼的人用哦
thz

顶上去啊