Question

给段ASP加ACC数据库的图片展示，有上一张，下一张功能的代码。只要可以显示上一张，下一张功能就行了

<%
imgid=request.QueryString("id")
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from chuangzao where imgid="&imgid,conn,1,3
rs.update
%> 这个是我数据代码，我已经实现了，图片展示功能 了，只是那个点击下一张的时候，可以跳转下一张功能不会写，求教。

Answer 1

<%
'判断上一张
Set Rs_R=Server.CreateObject("ADODB.RecordSet")
Rs_R.open"Select top 1 * From chuangzao where imgid <"&rs("imgid")&" order by imgid desc",conn,1,1
if Rs_R.EOF or Rs_R.BOF then
response.Write("第一张 ")
response.write " "
response.write " "
else
response.Write("<a href=""creativity2.asp?id="&Rs_R("imgid")&""">上一张</a>")
response.write " "
response.write " "
Rs_R.Close()
Set Rs_R = Nothing
end if
'判断下一张
Set Rs_N=Server.CreateObject("ADODB.RecordSet")
Rs_N.open"Select top 1 * From chuangzao where imgid >"&rs("imgid")&" order by imgid Asc",conn,1,1if Rs_N.EOF or Rs_N.BOF then
response.Write("最后一张")
response.write " "
response.write " "
else
response.Write("<a href=""creativity2.asp?id="&Rs_N("imgid")&""">下一张</a>")
Rs_N.Close()
Set Rs_N = Nothing
end if
%>

Answer 2

你可以先循环从数据库中读取出图片id再生成页面。

Answer 3

动网论坛也是ASP的，有这种功能。。