33 1234
发新话题
打印

[原创] 发个论坛转帖利器的源码,自己有空间的可以改成自己专用的

发个论坛转帖利器的源码,自己有空间的可以改成自己专用的

复制以下代码,随便开个文本文档,粘贴进去,然后另存为后缀为.htm的网页文件,你可以把其中“EBO霸王论坛”换成你的论坛地址,

上传到你的空间,再把地址链接到你的论坛上,就成了你论坛专用的转帖利器——UBB代码转换器!!!
复制内容到剪贴板
代码:
<HTML>
<HEAD>
<TITLE>UBB代码转换器——论坛转贴利器</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312"><LINK
<META content="MSHTML 6.00.2800.1276" name=GENERATOR>
<style type="text/css">
<!--
.unnamed1 {
font-size: 12px;
line-height: 19px;
color: #333333;
}
-->
</style>
</HEAD>
<BODY leftMargin=0 topMargin=2 class="unnamed1">
<TABLE cellSpacing=0 cellPadding=3 width="771" align=center border=0>
  <TBODY>
  <TR>
      <TD width="765" vAlign=bottom bgcolor="#3367cc" class="unnamed1">
        <b>
  <a style="text-decoration: none" href="index.php">
  <font color="#FFFFFF">EBO霸王论坛论坛</font></a> <font color="#FFFFFF">-

></font>
  <a href="http://eboy.bbs.ful.cn">
  <font color="#FFFFFF"><a style="text-decoration: none">论坛转贴利器

</a></font></a>
  

</a>              &nbs

p;               

               &n

bsp;              &nbs

p;  
  <font color="#FFFFFF"><a href="http://ebo.game.topzj.com">返回主页

</a></font></b></TD>
    </TR>
  <TR>
      <TD width="765" vAlign=bottom bgcolor="#3367cc" class="unnamed1">
        <p align="center" style="line-height: 23px"><b>
  <FONT color="#FFFFFF" class=big1 size="3" face="幼圆">论坛转贴利器-EBO霸王论

坛专用</FONT></b><font color="#FFFFFF"><BR>
          将下面经过转换的文字复制到发贴时的文本框中即可<BR>
          通过这个可以获得图片地址或文本转换成论坛UBB代码。</font></p>
        </TD>
    </TR>
  </TBODY></TABLE>
  
  <SCRIPT language=JavaScript>
<!--
// Width = 779;
// Get browser ...
function checkBrowser(){
this.ver=navigator.appVersion
this.dom=document.getElementById?1:0
this.ie6=(this.ver.indexOf("MSIE 6")>-1 && this.dom)?1:0;
this.ie5=(this.ver.indexOf("MSIE 5")>-1 && this.dom)?1:0;
this.ie4=(document.all && !this.dom)?1:0;
this.ns5=(this.dom && parseInt(this.ver) >= 5) ?1:0;
this.ns4=(document.layers && !this.dom)?1:0;
this.bw=(this.ie5 || this.ie4 || this.ns4 || this.ns5)
return this
}
var bw = new checkBrowser();
// Get page size ...
var PageWidth = (bw.ns4 || bw.ns5) ? innerWidth : document.body.offsetWidth - 20;
var PageHeight = (bw.ns4 || bw.ns5) ? innerHeight : document.body.offsetHeight - 20;
// Get our layer ...
var my_div = document.getElementById('divtxl');
// Fix stuff ...
if (parent && (PageWidth < 300 || PageHeight < 200)) {
my_div.style.display = "none";
}
else {
my_div.style.left = (PageWidth - 781) / 2;
document.write('<div align="center"><table width="100%" border="0" cellpadding="0"

cellspacing="0"><tr><td height="22" style="font: Tahoma; font-size: 11px; color:

#D4D4D4;"> </td></tr></table></table></div>\n');
}
-->
</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="([^"]+)"[^>]*>(.*?)<\/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(/ /g," ");
str = str.replace(/&/g,"&");
str = str.replace(/"/g,"\"");
str = str.replace(/</g,"<");
str = str.replace(/>/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>


<TABLE class=unnamed1 cellSpacing=1 cellPadding=5 width="720"
  align=center>
  <TBODY>
  <TR align=middle>
      <TD bgcolor="#e2f1fb">
      <TABLE cellSpacing=0 cellPadding=20 width=747 align=center border=0 id="table1">
        <TBODY>
        <TR>
          <TD class=right vAlign=top bgColor=#f8f8f8>
   <TEXTAREA class=textarea onbeforepaste="if(document.getElementById

('x_paste').checked){window.clipboardData.setData('text',trans());this.focus();}"

id=bbcodetext rows=16 cols=100 name="S1"></TEXTAREA><BR>
   <IFRAME
            id=rtf style="WIDTH: 0px; HEIGHT: 0px" marginWidth=0 marginHeight=0
            src="about:blank" scrolling=no name="I1"></IFRAME>
            <TABLE borderColor=#fffbff width=714 bgColor=#fffbff border=1 id="table2">
              <TBODY>
              <TR>
                <TD align=middle><INPUT onclick="document.getElementById('bbcodetext').value

='' " type=reset value=清空文本框>
                   ||  
    <INPUT onclick="document.getElementById('bbcodetext').value

= trans()" type=button value=转换(覆盖) name=button1>
<INPUT onclick="document.getElementById('bbcodetext').value += trans()" type=button value=转

换(追加) name=button2>
                   ||
                  <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 onclick="CopyTextToPastBoad('bbcodetext')" type=button value=复制

到剪切板 name=button>
                </TD></TR></TBODY></TABLE>
            <SCRIPT>rtf.document.designMode="On";</SCRIPT>
          </TD></TR></TBODY></TABLE></TD></TR>
  <TR>
      <TD height=30 align=right bgcolor="#3367cc">
         </TD>
    </TR>
  <TR>
      <TD align=left bgcolor="#3367CC"><font color="#FFFFFF"><font size="4">使用方

法:</font><BR>看到好图了,怎么把他们以最快的速度转移到论坛里? 跟我来: <BR>
  </font><FONT
            color=#FFFFFF>1.用鼠标把你在其他站点看到的你需要的东西(不管是图片还是文字)全部选

中,也就是让它们变成高亮或抹黑状态,鼠标右键点选复制(或者使用键盘热键CTRL+C);<BR>
            2.切换到本转贴页面,点页面下方的"开始转换按纽"即可生成对应的代码(无须粘贴);<BR>
            3.上下拉动旁边的滚动条,修改删剪一些重复和不需要的地方(防止把不需要的信息复制过

来哦);<BR>
            4.再用鼠标选中转换后生成的起止代码(注意不要选中重复的部分),鼠标右键复制(或

CTRL+C)后粘贴(CTRL+V)到论坛的帖子里即可! 98机器 和IE6.0以下的不能使用哦!</TD>
    </TR></TBODY></TABLE>


</BODY></HTML>
[ 本帖最后由 神祗之眼 于 2006-9-10 03:50 编辑 ]
EBO霸王论坛欢迎你 !http://ebo.game.topzj.com

TOP

谢谢,已经有了

TOP

楼主太厉害了,不过这个好像不道德吧?
QQ 9217178    成网科技www.it28.net
域名注册、出售空间、出售论坛、网页制作、广告设计、图像处理

飞天投资论坛

TOP

做什么用呀??


HOHO  看到最后面的说明了 刚才米注意 不好意思  谢谢LZ

[ 本帖最后由 leiorna 于 2006-9-12 01:34 编辑 ]

TOP

TOP

貌似1年前还是2年前就有这个了...
少女悲剧中...NowLoading....

TOP

o o  明白了..

TOP

我不会用啊

TOP

感谢再次拿出来分享。
http://www.erika.com.cn 一个中华只得一个中华ERIKA讨论区

TOP

晕。。。。。

怎么是乱码啊。。。。。。。帮我看看啊。。。
http://hi.814e.com/yunsky/zt.htm
http://hi.814e.com/yunsky/zt.htm:'( :'(

TOP

 33 1234
发新话题