ASP 动态滚动显示ACCESS数据记录

<tablewidth="100%"border="0"cellspacing="0"cellpadding="4"><tr><tdcolspan="3"><B><img... <table width="100%" border="0" cellspacing="0" cellpadding="4">
<tr>
<td colspan="3"><B><img src="images/hezhuo.gif" width="40" height="20">友情链接:</B> </td>
<td width="14%" colspan="2" align="right"><a href="Menu/logoweb.asp">我要加入>></a></td>
</tr>
<%
dim conn
dim connstr
on error resume next
connstr="DBQ="+server.mappath("database/mydata.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
sql="select * from mytable where commend=1"
set rs=server.CreateObject("ADODB.RecordSet")
rs.open sql,conn,1,1
for i=1 to 5
if rs.eof then exit for
%>
<tr>
<%
for j=1 to 4
if rs.eof then exit for
%>
<td width="25%"><a href="<%=rs("url")%>" target="_blank"><%=rs("name")%></a> | </td>
<%
rs.movenext
next%>
</tr>
<%
next
%>
<%if rs.recordCount<=20 then%>
<tr>
<td width="20%" colspan="5" align="right"><a href="Menu/logoshow.asp?page=1" target="_blank">详情>></a>
</td>
</tr>
<%else%>
<tr>
<td width="20%" colspan="5" align="right"><a href="Menu/logoshow.asp?page=1" target="_blank">更多>></a></td>
</tr>
<%end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
</table>

现在只是显示access数据库中前20条记录,每一次显示20条记录(其中每行4条记录)然后停顿5秒钟后,向上滚动再显示下一批20条记录,如此反复的循环下去
展开
 我来答
百度网友3711d14a2
2006-08-18 · TA获得超过1583个赞
知道小有建树答主
回答量:1635
采纳率:0%
帮助的人:0
展开全部
4月10日 11:02 通常是链接库的命令不对造成的
在 .mdb 前面加上/修改路径
我的写法:
connstr = "Provider=MSDASQL;DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&server.mappath("/AAA/BBB.mdb")
&";uid=;pwd=;"
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open connstr
在本机和Internet上均能正确实现---因为遇到同样的问题修改后的结果

为了回避“敏感词汇”,上面代码部分改为了全角
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式