捌玖网络工作室 » ASP,PHP,CGI,JSP技术 » 脚本实现点击复制本网址

admin 发表于 2008-1-24 23:28

脚本实现点击复制本网址

[code]代码如下:
(yQ1L]B <script language=javascript>\LOo$W8p,X
// 自动 COPY 代码开始 b/]#L*S,G
function MM_findObj(n, d) { //v4.0
X,}x ocIn$F%z|'w var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
[/Zr w+D
m#O/g d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
VLGV&bMTM if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[n]; |#I&Bt$K#I'jT~u
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers.document);
Z)I]BVNpIN
if(!x && document.getElementById) x=document.getElementById(n); return x;,_4v*f e0g1R
}HM5Y"xUaZXT
function JM_cc(ob){
\9PaE&D$J4Tu8O/T var obj=MM_findObj(ob); if (obj) {ZT'~!chG4C
obj.select();js=obj.createTextRange();js.execCommand("Copy");}
l'DJ!BE8].u alert("复制成功！您可以将本页推荐给你QQ或者论坛上的朋友阅读！");
"y!|I"gY8S/kG~ }
d`6tX:t.UtEu$s
Yv u7f g%f2pDU9crj
// 自动 COPY 代码结束
\&^:wq;H q.| 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")>');
!f:w t7F4I </script>[/code]
m5?2PN2CbJ:eNU [color=#ff9900][b]点击复制本网址，发给POPO/QQ/MSN好友共享,放到网页中的效果:[/b][/color]
8C+V#W1\"i-G"IF [color=#ff9900][b][attach]413[/attach][/b][/color]

查看完整版本: 脚本实现点击复制本网址