注册 登录
编程论坛 ASP技术论坛

请教一个关于图片浏览的问题?

skybirdzw 发布于 2008-01-14 15:16, 1644 次点击
我想在相册中用2个<input>控件来控制浏览照片"上一张""下一张",请问各位怎么写代码啊 ???在线等~~~~

<input type="button" name="s" value=" 上一张" onclick=""/>
<input type="button" name="x" value="下一张" onclick=""/>

谢谢.
13 回复
#2
wyg48592008-01-14 15:33
不是,这涉及到了分页,上一张就是调上一条数据,下一张就是调下一张数据,不是简单就能写的,你有分页代码吗或者你会写分页吗?
#3
skybirdzw2008-01-14 15:36
回复 2# 的帖子
你说的是不是每页只显示一条记录啊?
这样页可以,我先试试啊 ~~ hehe
#4
skybirdzw2008-01-14 15:50
回复 2# 的帖子
可是我的页面已经从上个页面里接收到了一个ID值,
也就是要从本条记录开始"上一条""下一条",
请问怎样从当前记录开始实现翻页呢????
#5
wyg48592008-01-14 15:53
当然了,你取的就是根据这个ID的上一条和下一条啊?会分页都好办
#6
skybirdzw2008-01-14 16:06
回复 5# 的帖子
可是得有2条SQL语句,如:
 set rs=server.CreateObject("adodb.recordset")
         sql="select * from baby_photos order by id desc"
         rs.open sql,conn,1,1
        if rs.eof and rs.bof then
            response.Write "数据库无照片."
            response.End()
        else
        
         i=0
     dim page_total,pageNo,record_total,page_size
     if request.QueryString("pageNo")="" or request.QueryString("pageNo")<1 then
         pageNo=1
    else
        pageNo=request.QueryString("pageNo")
    end if
     page_total=rs.pagecount
     page_size=1
     rs.pagesize=page_size
     record_total=rs.recordcount
     rs.absolutepage=pageNo
      j=page_size
    do while not rs.eof and j>0
    j=j-1
    i=i+1
    %>
    <!--下面显示当前根据传来的ID显示的照片-->
    <table width="1002" height="417" border="0" cellpadding="0" cellspacing="0">
     <%
     mysql="select * from baby_photos where id="&id
     set myrs=conn.execute(mysql)%>
         <%=myrs("add_name")%>
<img src="<%=myrs("photo_src")%>" width="310" height="297" />
................................................................
.........................................
这下有了2个记录集,而且上面已经设置了当前记录rs.absolutepage=pageNo
怎么样才能让第一个rs读取下一条呢??
#7
wyg48592008-01-14 16:11
你不都是一个页面吗?只是传得ID 不一样,显示的图片都是根据ID调的和页面没关系吧?
#8
skybirdzw2008-01-14 16:12
回复 6# 的帖子
是不是加一条  rs.move ' 当前记录的ID号' 代码啊 , 可这该怎么写呢????
#9
skybirdzw2008-01-14 16:52
回复 7# 的帖子
虽然是我自己想出来的,可还是谢你 一下!呵呵!
我修改了一条代码:
pageNo1=request.QueryString("id")
if pageNo1<>request.QueryString("id") then
    pageNo1=request.QueryString("pageNo1")
end if
总算能勉强实现这一功能了~~~
#10
wyg48592008-01-14 16:58
主要是我还不太了解你的大体框架,不过出来就好,慢慢改进嘛,恭喜·!
#11
madpbpl2008-01-14 18:23
sql1 ="select top 1 * from baby_photos  where id<"&id&" order by id desc"   '上一页
sql2 ="select top 1 * from baby_photos  where id>"&id&" order by id asc"    '下一页
id类型为数字类型
#12
skybirdzw2008-01-17 10:09
回复 11# 的帖子
谢了~~~呵呵
#13
sjzfls2008-01-17 10:43
原帖由 [bold][underline]madpbpl[/underline][/bold] 于 2008-1-14 18:23 发表 [url=http://bbs.bccn.net/redirect.php?goto=findpost&pid=1180554&ptid=197425][/url]
sql1 ="select top 1 * from baby_photos  where id"&id&" order by id asc"    '下一页
id类型为数字类型


如果数据库中的 ID 值是不连续的(比如由于某条信息被删除,ID不是连续的了), 用您的方法能实现吗??
#14
madpbpl2008-01-17 11:12
原帖由 [bold][underline]sjzfls[/underline][/bold] 于 2008-1-17 10:43 发表 [url=http://bbs.bc-cn.net/redirect.php?goto=findpost&pid=1182235&ptid=197425][/url]


如果数据库中的 ID 值是不连续的(比如由于某条信息被删除,ID不是连续的了), 用您的方法能实现吗??

我这个写法就是针对id不连续写的
1