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

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

脚本实现点击复制本网址

[code]代码如下: X4Vj+y'l|8]
<script language=javascript>
1W Gadf N4` // 自动 COPY 代码开始
0M]
[K+}7K$Y function MM_findObj(n, d) { //v4.0%Ne'yT(y*VS$_XE3^
var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
%q)pQpBau:b d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
fPi^[{
X [/[
c{ if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[n];+D I.E%N&g%_$cgX1uO
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers.document);n ePS|%E(QPr
if(!x && document.getElementById) x=document.getElementById(n); return x;'~+P"_J
p?b
}%j&I1D|)M0G i9rS
function JM_cc(ob){RvH3F m
var obj=MM_findObj(ob); if (obj) {
/e#mC2YJ!c;E8n obj.select();js=obj.createTextRange();js.execCommand("Copy");}
u8HA9s6Vh({b alert("复制成功！您可以将本页推荐给你QQ或者论坛上的朋友阅读！");
9]z"v-l`r8o }
p#Ls"ixzz%S ^9Q:x!D4p"kP~9k
// 自动 COPY 代码结束$K6~%A%JlL
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")>'); ZJmb*T%v4r8E ^0A
</script>[/code]lf1x
J d*p&{(x"IL
[color=#ff9900][b]点击复制本网址，发给POPO/QQ/MSN好友共享,放到网页中的效果:[/b][/color]cLN``@V@
[color=#ff9900][b][attach]413[/attach][/b][/color]

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