定时更换超级连接的代码

2007-06　　作者：佚名　　来源：不详　网友评论　

<body onload="if (document.all||document.layers) {regenerate2();update()}"> <Body> <style>  </style> <div id="tickertape"> <div id="subtickertape" class="subtickertapefont">初始化...</div> </div> <script language="JavaScript1.2"> var speed=4500 var news=new Array() news[0]="<a href='http://www.58mb.com'>网页教学网</a>" news[1]="<a href='http://bbs.58mb.com'>网页教学网论坛</a>" news[2]="<a href='http://www.webjx.net'>备用域名webjx.net</a>" i=0 if (document.all) tickerobject=document.all.subtickertape.style else tickerobject=document.tickertape.document function regenerate(){ window.location.reload() } function regenerate2(){ if (document.layers) setTimeout("window.onresize=regenerate",450) } function update(){ BgFade(0xff,0xff,0xff, 0x00,0x00,0x00,10); if (document.layers){ document.tickertape.document.subtickertape.document.write('<span class="subtickertapefont">'+news[i]+'</span>') document.tickertape.document.subtickertape.document.close() } else document.all.subtickertape.innerHTML=news[i] if (i<news.length-1) i++ else i=0 setTimeout("update()",speed) } function BgFade(red1, grn1, blu1, red2, grn2, blu2, steps) { sred = red1; sgrn = grn1; sblu = blu1; ered = red2; egrn = grn2; eblu = blu2; inc = steps; step = 0; RunFader(); } function RunFader() { var epct = step/inc; var spct = 1 - epct; if (document.layers) tickerobject.bgColor = Math.floor(sred * spct + ered * epct)*256*256 + Math.floor(sgrn * spct + egrn * epct)*256 + Math.floor(sblu * spct + eblu * epct); else tickerobject.backgroundColor= Math.floor(sred * spct + ered * epct)*256*256 + Math.floor(sgrn * spct + egrn * epct)*256 + Math.floor(sblu * spct + eblu * epct); if ( step < inc ) { setTimeout('RunFader()',50); } step++; } </script> </tr> </table> </Body>

[Ctrl+A 全部选择提示：你可先修改部分代码，再按运行]

>> 更多评论