骤雨打新荷
» 游客:  注册 | 登录 | 会员 | 社区银行 | 股票中心 | 帮助

 

作者:
标题: 贴间UBB转贴转手[快捷方便版]For2.5、3.0、4.0 上一主题 | 下一主题
txfzq
管理员




积分 33428
发帖 13147
注册 2005-5-26
状态 离线
#1  贴间UBB转贴转手[快捷方便版]For2.5、3.0、4.0

发表新话贴显示“UBB转贴转手”
修改模版文件:post_newthread.htm
1.查找
CODE:  [Copy to clipboard]
{template header}
再其上面加入:
CODE:  [Copy to clipboard]
<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="([^"]+)"[^>]*>(.*?)<\/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(/&/g,"&");
str = str.replace(/"/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");

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>
2.查找
CODE:  [Copy to clipboard]
<textarea rows="18" cols="85" name="message" tabindex="4" onSelect="javascript: storeCaret(this);" onClick="javascript: storeCaret(this);" onKeyUp="javascript: storeCaret(this);" onKeyDown="javascript: ctlent();">$message</textarea>
<br>
说明 2.5、3.0、4.0可能代码不尽相同,只要查找<textarea rows="18" 就可以了,然后在</textarea>
<br>后面加
CODE:  [Copy to clipboard]
<IFRAME id=rtf style="WIDTH: 0px; HEIGHT: 0px" marginWidth=0 marginHeight=0 src="about:blank" scrolling=no></IFRAME><INPUT onclick="document.getElementById('message').value += trans()" type=button value=UBB转贴助手><SCRIPT>rtf.document.designMode="On";</SCRIPT><br>
同理:post_newreply.htm、viewthread.htm、forumdisplay.htm等回贴框下面都可以加UBB转贴助手

演示论坛:
http://www.ye-cn.com
发帖和回帖子 需注册才能看见效果。所以需要看效果的自己看吧




2005-11-27 17:06
查看资料  发短消息   编辑帖子  引用回复


可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题



论坛跳转:  



[ 联系我们 - 骤雨打新荷 ]

Powered by Discuz! 2.5 © 2001-2005 Comsenz Technology Ltd.