asp动态显示access 文字上下滚动

用asp代码动态显示access 里的记录在首页的一个小页面内上下循环滚动,我问了好几个人,都搞不定,有高手请把代码贴出,在后面标出注释,指出哪里定义页面大小,哪里是定义数据库,哪里定义文字滚动速度,哪里定义......我太笨,呵呵,谢谢谢谢了

<div id="marquees">
<%'连接数据库
db="123.mdb" '数据库路径
On Error Resume Next
dim ConnStr
dim conn
ConnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open connstr
If Err Then
err.Clear
Set Conn = Nothing
Response.Write "数据库连接出错，文件中的数据库参数设置。"
Response.End
End If '查询循环显示记录
set rs=conn.execute("select top 10 * from [表] order by id desc") '取最新的10条信息在这里滚动
do while not rs.eof
response.write "<a href=?id="&rs("id")&">"&rs("title")&"</a>"
response.write "<br>"
rs.movenext
loop
%>
</div>
<script language="JavaScript">
marqueesHeight=200; //滚动的高度
stopscroll=false;with(marquees){
style.width=0;
style.height=marqueesHeight;
style.overflowX="visible";
style.overflowY="hidden";
noWrap=true;
onmouseover=new Function("stopscroll=true");
onmouseout=new Function("stopscroll=false");
}
document.write('<div id="templayer" style="position:absolute;z-index:1;visibility:hidden"></div>');preTop=0; currentTop=0;function init(){
templayer.innerHTML="";
while(templayer.offsetHeight<marqueesHeight){
templayer.innerHTML+=marquees.innerHTML;
}
marquees.innerHTML=templayer.innerHTML+templayer.innerHTML;
setInterval("scrollUp()",50); //50 滚动速度，数字越小滚动速度越快
}
document.body.onload=init;function scrollUp(){
if(stopscroll==true) return;
preTop=marquees.scrollTop;
marquees.scrollTop+=1;
if(preTop==marquees.scrollTop){
marquees.scrollTop=templayer.offsetHeight-marqueesHeight;
marquees.scrollTop+=1;
}
}
</script>

首先 你要会ASP数据库连接 数据库读取列操作然后 把这些值放在<marquee></marquee>标签中 就行了

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息