自动复制代码

<script language=javascript>
    // 自动 COPY 代码开始
    function MM_findObj(n, d) { //v4.0
    var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
    if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[n];
    for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers.document);
    if(!x && document.getElementById) x=document.getElementById(n); return x;
    }
    function JM_cc(ob){
    var obj=MM_findObj(ob); if (obj) {
    obj.select();js=obj.createTextRange();js.execCommand("Copy");}
    alert("复制成功！您可以将本页推荐给您QQ或者论坛上的朋友阅读！");
    }
   
    // 自动 COPY 代码结束
    document.write('<br><b><font color=red style=font-size:14px>推荐给您的朋友阅读：</font></b><input name="page_url" value="'+window.location.href+'" size="64"> <input type="button" name="Button" class="button1" style=color:red value="点击这里复制本页地址推荐给您QQ或者论坛上的朋友阅读！" onClick=JM_cc("page_url")>');
    </script>