公告栏为了很大的问题

wgaggassi 2008-04-16 10:30:03
参考了很多书,才做出一个 公告栏,
大概是这样子的,这个公告栏要从数据库里读出记录,然后按顺序显示
但是为什么滚动的时候前面记录的速度慢,后面记录的速度快,导致最后就混在一起了,大家帮帮忙,怎么修改能让这些记录滚动速度一致?~谢谢!

<%Set rs=Server.CreateObject("adodb.Recordset")
sql = "select * from Announcement order by id desc"
rs.Open sql,conn,3,2
if not rs.Eof then%>
<%for i=1 to rs.recordcount%>
<font color="#330099"><marquee behavior="scroll" direction=up width=100% height=150 scrollamount=2 scrolldelay=500 onMouseOver='this.stop()' onMouseOut='this.start()'>
<center>
<%=rs("ann")%>
</center>
<br>
    <%=rs("pl_name")%>
<%rs.movenext%>
<%next
end if%>
<%rs.close%>
</marquee></font>
...全文
85 5 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
wgaggassi 2008-04-16
  • 打赏
  • 举报
回复
[Quote=引用 4 楼 itzhiren 的回复:]
<%Set rs=Server.CreateObject("adodb.Recordset")
sql = "select * from Announcement order by id desc"
rs.Open sql,conn,3,2
if not rs.Eof then%>
<marquee behavior="scroll" direction=up width=100% height=150 scrollamount=2 scrolldelay=500 onMouseOver='this.stop()' onMouseOut='this.start()'>
<%for i=1 to rs.recordcount%>
<font color="#330099">
<center>

[/Quote]

谢谢!
原来我的逻辑出了问题!
itzhiren 2008-04-16
  • 打赏
  • 举报
回复
<%Set rs=Server.CreateObject("adodb.Recordset")
sql = "select * from Announcement order by id desc"
rs.Open sql,conn,3,2
if not rs.Eof then%>
<marquee behavior="scroll" direction=up width=100% height=150 scrollamount=2 scrolldelay=500 onMouseOver='this.stop()' onMouseOut='this.start()'>
<%for i=1 to rs.recordcount%>
<font color="#330099">
<center>
<%=rs("ann")%>
</center>
<br>
     <%=rs("pl_name")%>
<%rs.movenext%>
<%next
end if%>
<%rs.close%>
</marquee> </font>
underone 2008-04-16
  • 打赏
  • 举报
回复
你先把font去掉 改成scrolldelay=200
wgaggassi 2008-04-16
  • 打赏
  • 举报
回复
改成这样也不对!
<font color="#330099"> <marquee behavior="scroll" direction=up width=100% height=150 scrollamount=2 scrolldelay=2 onMouseOver='this.stop()' onMouseOut='this.start()'>
underone 2008-04-16
  • 打赏
  • 举报
回复
滚动延时属性SCROLLDELAY
速度属性SCROLLAMOUNT

28,409

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧