您的位置:首页 > 其它

文字向上无缝滚动

2010-03-09 13:46 441 查看
<style>
#xiangshangdemo1{
height:auto;
text-align:left;

}
#xiangshangdemo2{
height:auto;
text-align:left;

}
#xiangshangdemo1 li{
list-style-type:none;
height:auto;
width:155px;
text-align:left;
}
#xiangshangdemo2 li{
list-style-type:none;
height:auto;
width:155px;
text-align:left;
padding-right:15px;
}
</style>

<div id="xiangshangdemo" style="overflow:hidden;height:145px;width:155px;margin-left:14px;">
<ul id="xiangshangdemo1">
<%set rs=server.CreateObject("Adodb.recordset")
sql="select * from product where bigclassname='香江之窗' order by ArticleID desc"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.Write"暂无内容"
else
do while not rs.eof%>
<li><table cellpadding="0" cellspacing="0" border="0" width="155"><tr><td width="155" height="22"><img src="img/jiantou.jpg" align="absmiddle" />  <a title="<%=rs("title")%>" href="Articleshow.asp?ArticleID=<%=rs("ArticleID")%>"><%=left(rs("Title"),20)%>...</a></td></tr></table></li>
<%rs.movenext
loop
end if
rs.close
set rs=nothing%>
</ul>
<ul id="xiangshangdemo2"></ul>
</div>
<script>
var xiangshangspeed=40
var xiangshangdemo=document.getElementById("xiangshangdemo");
var xiangshangdemo2=document.getElementById("xiangshangdemo2");
var xiangshangdemo1=document.getElementById("xiangshangdemo1");
xiangshangdemo2.innerHTML=xiangshangdemo1.innerHTML
function xiangshangMarquee(){
if(xiangshangdemo2.offsetTop-xiangshangdemo.scrollTop<=0)
xiangshangdemo.scrollTop-=xiangshangdemo1.offsetHeight
else{
xiangshangdemo.scrollTop++
}
}
var xiangshangMyMar=setInterval(xiangshangMarquee,xiangshangspeed)
xiangshangdemo.onmouseover=function() {clearInterval(xiangshangMyMar)}
xiangshangdemo.onmouseout=function() {xiangshangMyMar=setInterval(xiangshangMarquee,xiangshangspeed)}
</script>
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: