一个关于数据读取的问题

wfjxx 2004-04-10 04:15:13
我现在读取了一个表
用asp如何写一个读取前一条数据
和如何读取下一条数据
请大家指点
谢谢
...全文
39 3 打赏 收藏 举报
写回复
3 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
chuanyuan88 2004-04-10
你需要这个:
http://foxer.vsky.net/softs/down/soft.asp?id=17
  • 打赏
  • 举报
回复
QQgenie 2004-04-10
定位一条数据,再用rs.movenext下一条,rs.movenext -1 上一条(rs.movePrev).
  • 打赏
  • 举报
回复
liuyingzi 2004-04-10
把下面的代码 换成你的表试试
<% sql="select * from adInfo where adId=" & Cint(adId)
Set rs= Server.CreateObject("ADODB.Recordset")
rs.open sql,conn,1,3
if rs.bof and rs.eof then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>找不到有关图书</li>"
end if
%>
<tr class="tdbg" align="center" ><td colspan="2"><font size='2'>
<li>上一本图书 :
<%
dim rsPrev
sql="Select * From adInfo Where adId<" & rs("adId") & " order by adId desc"
Set rsPrev= Server.CreateObject("ADODB.Recordset")
rsPrev.open sql,conn,1,1
if rsPrev.Eof then
response.write "没有了"
else
response.write "<a href='editAd.asp?adId=" & rsPrev("adId") & "'>" & rsPrev("magName") & "</a>"
end if
rsPrev.close
set rsPrev=nothing
%>
</li>
<br>
<li> 下一本图书 :
<%
dim rsNext
sql="Select * From adInfo Where adId>" & rs("adId") & " order by adId asc"
Set rsNext= Server.CreateObject("ADODB.Recordset")
rsNext.open sql,conn,1,1
if rsNext.Eof then
response.write "没有了"
else
response.write "<a href='editAd.asp?adId=" & rsNext("adId") & "'>" & rsNext("magName") & "</a>"
end if
rsNext.close
set rsNext=nothing
%>
</li></font></td>
</tr>
  • 打赏
  • 举报
回复
发帖
ASP

2.8w+

社区成员

ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
帖子事件
创建了帖子
2004-04-10 04:15
社区公告
暂无公告