定时更换超级连接的代码

原创 2006年06月01日 13:33:00
<!--用<body onload="if (document.all||document.layers) {regenerate2();update()}">替换原来的<Body>-->
<!--将以下代码加入HTML的<Body></Body>之间-->

<style>
<!--

#tickertape{
position:relative;

layer-background-color:black;
width:400;
height:12;
; font-family: "宋体"; font-size: 9pt}

#subtickertape{
background-color:black;
position:absolute;
border: 1px solid black;
width:400;
height:12;
; font-family: "宋体"; font-size: 9pt
}


.subtickertapefont{
font:bold 9pt "宋体";
text-decoration:none;
color:white;
}

.subtickertapefont a{
color:white;
text-decoration:none;
; font-family: "宋体"; font-size: 9pt}
-->
</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://remotion.myetang.com'>网页特效梦工厂</a>"
news[1]="<a href='http://www.skycn.com'>天空下载</a>"
news[2]="<a href='http://www.delphibbs.com'>大富翁论坛</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>

相关文章推荐

用java代码连接Oracle超级简单

  • 2009年07月27日 17:36
  • 2KB
  • 下载

架构师修练 I - 超级代码控

架构师修练 I - 超级代码控

7个超级实用的PHP代码片段分享

1、超级简单的页面缓存   如果你的工程项目不是基于 CMS 系统或框架,打造一个简单的缓存系统将会非常实在。下面的代码很简单,但是对小网站而言能切切实实解决问题。     // de...

超级有意思的程序代码注释--ASCII图片

网上收集了许多超级有意思的代码注释,有如来佛、草泥马等有趣的注释!这里有很多有意思的代码注释都是从这个网站上转载的:http://www.asciiworld.com/ 如来佛代码注释,保佑代码...

cocos2d-x游戏开发系列教程-超级玛丽02-代码结构

代码下载链接http://download.csdn.net/detail/yincheng01/6864893解压密码:c.itcast.cn前景回顾上一篇博文提到超级马里奥的游戏效果,大家是否已经...

超级实用且不花哨的JS代码大全

事件源对象  event.srcElement.tagName  event.srcElement.type捕获释放  event.srcElement.setCapture();   eve...
  • jamv163
  • jamv163
  • 2014年10月17日 12:47
  • 279

10个超级有用、必须收藏的PHP代码样例

http://www.techug.com/10-super-useful-php-code-snippets 作为一个正常的程序员,会好几种语言是十分正常的,相信大部分程序员也都会编写几句...

8.超级彩图(storyboard和代码组合搭建界面)

需求分析:
  • cw0028
  • cw0028
  • 2015年06月10日 20:39
  • 599

超级有意思的代码注释

简述程序员情怀,你值得拥有!Code is far away from bug with the animal protecting… 简述 神兽草泥马 佛祖保佑 更多参考神兽草泥马/** * *...
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:定时更换超级连接的代码
举报原因:
原因补充:

(最多只允许输入30个字)