主页

一个关于数据读取的问题

wfjxx 2004-04-10 04:15:13

我现在读取了一个表
用asp如何写一个读取前一条数据
和如何读取下一条数据
请大家指点
谢谢

...全文

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

创建于2007-09-28

加入

2.8w+

社区成员

35.7w+

社区内容

ASP即Active Server Pages，是Microsoft公司开发的服务器端脚本环境。

申请成为版主

社区公告

暂无公告