公告栏为了很大的问题

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

<%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>