网页中的寻呼机答案

【问题标题】：pager in webpage网页中的寻呼机
【发布时间】：2016-02-06 04:47:09
【问题描述】：

我想创建一个有 PREV 和 NEXT 按钮的页面。当我按下 NEXT 按钮时，数据库中的下一个信息示例：

ID   Firstname   Lastname   Gender  Position
112  Victor      bbb        Male    Programmer
232  Anna        xxxx       Female  Manager
301  yyyy        yyyy       male    Clerk

此数据连接到其他表

示例输出 htm 视图

ID      : 112
Fullname: victor bbb      Gender : Male
Position: Programmer      Department: xxx
other information: blahblah
-------------------------------------------
<-PREV-                          -NEXT-->

当我点击下一个按钮时，会出现 anna 的信息。如何在asp中实现这一点？我是 asp 新手，所以我现在不知道该怎么做。

【问题讨论】：

标签： sql asp-classic datapager

【解决方案1】：

//retrieve requested page
page = request.querystring("page")
MyPageSize=10

Const adOpenForwardOnly = 0
Const adLockReadOnly = 1
Const adUseClient = 3
Const adCmdText = 1 

//Make sure the requested page is valid
If page = "" Then
    page = 1
    else
    page = cint(page)
End If

DisplayNum = 0

rs.PageSize = MyPageSize
rs.CursorLocation = adUseClient 
SQL="select * from tableName order by id"
rs.Open SQL,objcon

ipage = rs.PageCount 

if page = 0 or page > ipage Then
    rs.AbsolutePage = ipage
    else
    rs.AbsolutePage = page
end if

Do While Not rs.EOF AND DisplayNum < MyPageSize

//Main Code to display data goes here for example resonse.write rs("id")&"<br>"

DisplayNum = DisplayNum + 1
rs.MoveNext
Loop

//Display navigation if pages are more than 1

If ipage > 1 Then

    if ipage > 1 And page > 1 Then
        response.write "<a href='?page="&page-1&"'>"&page-1&"</a>&nbsp;"
    end if

    For z = 1 to ipage
        If z = page then
            response.write page
            Else
            response.write "<a href='?page="&z&"'>"&z&"</a>&nbsp;"
        End If 
    Next 



    If ipage > 1 And page < ipage Then
        response.write "<a href='?page="&page+1&"'>"&page+1&"</a>"
    end if

end if
rs.Close

【讨论】：