带复选框的列表框[网页特效代码] dn001 2009-06-21 08:15:56 <!-- 把下列代码放到<body>区域中 --> <!-- 动态图开始 --> <script language=JavaScript> var imgUrl=new Array(); var imgLink=new Array(); var adNum=0; imgUrl[1]="/img/200406301.jpg"; imgLink[1]="/js"; imgUrl[2]="/img/200406302.jpg"; imgLink[2]="/js"; imgUrl[3]="/img/200406303.jpg"; imgLink[3]="/js"; imgUrl[4]="/img/200406304.jpg"; imgLink[4]="/js"; imgUrl[5]="/img/200406305.jpg"; imgLink[5]="/js"; var imgPre=new Array(); var j=0; for (i=1;i<=5;i++) { if( (imgUrl[i]!="") && (imgLink[i]!="") ) { j++; } else { break; } } function playTran(){ if (document.all) imgInit.filters.revealTrans.play(); } var key=0; function nextAd(){ if(adNum<j)adNum++ ; else adNum=1; if( key==0 ){ key=1; } else if (document.all){ imgInit.filters.revealTrans.Transition=6; imgInit.filters.revealTrans.apply(); playTran(); } document.images.imgInit.src=imgUrl[adNum]; theTimer=setTimeout("nextAd()", 5000); } function goUrl(){ jumpUrl=imgLink[adNum]; jumpTarget='_self'; if (jumpUrl != ''){ if (jumpTarget != '') window.open(jumpUrl,jumpTarget); else location.href=jumpUrl; } } </script> <a href="javascript:goUrl()"><div aligm=right><img style="FILTER: revealTrans(duration=2,transition=6);border-color:#000000;color:#000000" src="javascript:nextAd()" width=150 border=1 class=moviepic name=imgInit height="200"></div></a> <!-- 动态图结束 -->