用鼠标拖动滚动条后,滚动条就会闪烁变色,很酷的哟!

- 中国WEB开发者网络 (http://www.webasp.net)
-- 网页特效 (http://www.webasp.net/javascript/)
--- 用鼠标拖动滚动条后,滚动条就会闪烁变色,很酷的哟! (http://www.webasp.net/javascript/1/774.htm)
-- 发布日期: 2005-07-06
<!-- 网页特效代码由[中国WEB开发者网络:http://www.ChinaWebDev.com]提供! -->
<!-- 要实现此效果需要 1 个步骤: -->

<!-- 第 1 步: -->
<!-- 把下面的代码加到<BODY></BODY>区域中: -->

<script language="JavaScript">
<!-- Scroll Surprise by kurt.grigg@virgin.net
colours=new Array('ff0000','fff000','00ff00','ffa500','ff00ff','00ffff','ffffff')
function flash(){
var clrPos=Math.floor(Math.random()*colours.length)
with (window.document.body.style){
scrollbarTrackColor=document.bgColor;
scrollbarFaceColor=document.bgColor;
scrollbarArrowColor=colours[clrPos];
scrollbar3dLightColor=colours[clrPos];
scrollbarHighlightColor=colours[clrPos];
scrollbarShadowColor=colours[clrPos];
scrollbarDarkShadowColor=colours[clrPos];
borderWidth=2;
borderStyle='solid';
borderColor=colours[clrPos];
}
}
if (document.all)window.document.body.onscroll=flash;
//-->
</script>
//请输入较长内容使得出现滚动条


webasp.net