用网上一段代码改写的。
用的图片是32X32。如要换图片只须替换脚本和样式中32就可以了。
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>
<style type="text/css">
#ScrollArea {
CLEAR: both; MARGIN: 0px 0px 0px 8px; OVERFLOW: hidden; WIDTH: 32px; HEIGHT: 32px
}
</style>
<script language="javascript">
var gScroll;
var gSpeed = 30;
var m = 0;
function fScroll() {
var a = document.getElementById("ScrollArea");
var b = document.getElementById("ScrollDiv1");
if(a.scrollTop>=b.scrollHeight){
a.scrollTop=0;
}else{
if(a.scrollTop % 32 == 0){
if(m > 67){
m = 0;
a.scrollTop++;
}
else
m = m + 1
}
else
a.scrollTop++;
}
}
function fStopScroll() {
clearInterval(gScroll);
}
function fContScroll() {
gScroll=setInterval(fScroll,gSpeed);
}
function fStartScroll() {
document.getElementById('ScrollDiv2').innerHTML=document.getElementById('ScrollDiv1').innerHTML;
var a = document.getElementById('ScrollDiv1');
var b = a.getElementsByTagName('img');
var c = a.getElementsByTagName('list');
for(var i=0;i<b.length;i++){
b[i].onmouseover = fStopScroll;
b[i].onmouseout = fContScroll;
b[i].parentNode.target = "_blank";
}
gScroll=setInterval(fScroll,gSpeed);
}
</script>
<body>
<div id="ScrollArea">
<table border="0" cellspacing="0" cellpadding="0">
<tr>
<td id="ScrollDiv1"><table width="32" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="1.gif" width="32" height="32"></td>
</tr>
<tr>
<td><img src="122.gif" width="32" height="32"></td>
</tr>
<tr>
<td><img src="12.gif" width="32" height="32"></td>
</tr>
<tr>
<td><img src="1222.gif" width="32" height="32"></td>
</tr>
</table></td></tr>
<tr>
<td id="ScrollDiv2"></td>
</tr>
</table>
</div>
<script language="JavaScript" type="text/javascript">
<!--
var a = document.getElementById("ScrollArea");
a.scrollTop = 10*Math.floor(Math.random()*50)+100;
setTimeout("fStartScroll()",1000);
//-->
</script>
</body>
</html>