带复选框的列表框[网页特效代码]

2024-04-27 13:59:52

字体：大中小

来源：转载

供稿：网友

<scr<a href="http://ip.vevb.com/">ip</a>t language=<a href="http://www.vevb.com/article.asp?typeid=160">java</a>Script>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 img<a href="http://pr.vevb.com/">PR</a>e=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);elselocation.href=jumpUrl;}}</script><a href="<a href="http://www.vevb.com/article.asp?typeid=36">Javascript</a>: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>

上一篇：全国省市县无刷新多级关联菜单[网页特效JS代码]

下一篇：滑出式网页导航菜单[网页特效]