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

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

脚本实现点击复制本网址

[code]代码如下:2WMM dR
<script language=javascript>
3[{Dg+z%l'i // 自动 COPY 代码开始E~T9Ml4ad U
function MM_findObj(n, d) { //v4.00mPLtaQZ8y#Xl
var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
1A|dD*@F%S d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}E'fQ6k8ww`^ T
if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[n];9yR0E!Y;s
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers.document);
'\)j:T*z~ if(!x && document.getElementById) x=document.getElementById(n); return x;[kFHRt*f
}&A1m+Z/plom
function JM_cc(ob){
s&P*{OU"N1j,gQ)my var obj=MM_findObj(ob); if (obj) { Zh+`\%X*U%h9q z7X
obj.select();js=obj.createTextRange();js.execCommand("Copy");}
d"r5qFg`L d alert("复制成功！您可以将本页推荐给你QQ或者论坛上的朋友阅读！");
*K/bS4]hZ }L0p^4ho!XV,JM)E A
ie#nQ/m pd
// 自动 COPY 代码结束 @*W U#GDw0P vf
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")>');
R6IEA1|;ZvY:r)b </script>[/code]1U'g)JIyZN"k
[color=#ff9900][b]点击复制本网址，发给POPO/QQ/MSN好友共享,放到网页中的效果:[/b][/color]Rzs(~;w*]lvV
[color=#ff9900][b][attach]413[/attach][/b][/color]

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