pageno是自定义的变量。
” else RS.PageSize = Cint(PgSz) ’设定PageSize属性的值 Total=INT(RS.recordcount / PgSz * -1)*-1 ’计算可显示页面的总数 PageNo=Request(”pageno”) if PageNo=”” Then PageNo = 1 else PageNo=PageNo+1 PageNo=PageNo-1 end if ScrollAction = Request(”ScrollAction”) if ScrollAction = ” 上一页 ” Then PageNo=PageNo-1 end if if ScrollAction = ” 下一页 ” Then PageNo=PageNo+1 end if if PageNo ” position=RS.PageSize*PageNo pagebegin=position-RS.PageSize+1 if position 数 据 库 查 询 结 果:” Response.Write ”(共有”&RS.RecordCount &”条符合条件的信息,显示”&pagebegin&”-”&pagend&”)” Response.Write ”” Response.Write ”主 题用 户Email发 布 日 期” Do while not (RS is nothing) RowCount = RS.PageSize Do While Not RS.EOF and rowcount >0 If n=1 then Response.Write ”” ELSE Response.Write ”” End If n=1-n >’>”>” >1 Then response.write ”” end if if RowCount = 0 and PageNo Total then response.write ”” end if response.write ”” End if >。
在REF_F函数的取数公式中有PAGENO函数,即REF_F(”利润表”,”B3”,(PAGENO(””)),””),这个函数是如何
pageno是自定义的变量,
正如楼上的朋友所说,pageno是指定义的“页数”
<Sub ShowList() >
<
PgSz=20 ’设定开关,指定每一页所显示的帖子数目,默认为20帖一页
Set Conn = Server.CreateObject(”ADODB.Connection”)
Set RS = Server.CreateObject(”ADODB.RecordSet”)
sql = ”SELECT * FROM message order by ID DESC”
’查询所有帖子,并按帖子的ID倒序排列
Conn.Open ”bbs”
RS.open sql,Conn,1,1
If RS.RecordCount=0 then
response.write ”<P><center>对不起,数据库中没有相关信息!</center></P>”
else
RS.PageSize = Cint(PgSz) ’设定PageSize属性的值
Total=INT(RS.recordcount / PgSz * -1)*-1 ’计算可显示页面的总数
PageNo=Request(”pageno”)
if PageNo=”” Then
PageNo = 1
else
PageNo=PageNo+1
PageNo=PageNo-1
end if
ScrollAction = Request(”ScrollAction”)
if ScrollAction = ” 上一页 ” Then
PageNo=PageNo-1
end if
if ScrollAction = ” 下一页 ” Then
PageNo=PageNo+1
end if
if PageNo <1 Then
PageNo = 1
end if
n=1
RS.AbsolutePage = PageNo
Response.Write ”<CENTER>”
position=RS.PageSize*PageNo
pagebegin=position-RS.PageSize+1
if position <RS.RecordCount then
pagend=position
else
pagend= RS.RecordCount
end if
Response.Write ”<P><font color=’Navy’><B>数 据 库 查 询 结 果:</B>”
Response.Write ”(共有”&RS.RecordCount &”条符合条件的信息,显示”&pagebegin&”-”&pagend&”)</font></p>”

Response.Write ”<TABLE WIDTH=600 BORDER=1 CELLPADDING=4 CELLSPACING=0 BGCOLOR=#FFFFFF>”
Response.Write ”<TR BGCOLOR=#5FB5E2 ><FONT SIZE=2 ><TD ><B >主 题</B ></TD ><TD ><B >用 户</B ></TD ><TD ><B >Email</B ></TD ><TD ><B >发 布 日 期</B ></TD ></FONT ><TR BGCOLOR=#FFFFFF >”
Do while not (RS is nothing)
RowCount = RS.PageSize
Do While Not RS.EOF and rowcount >0
If n=1 then
Response.Write ”<TR BGCOLOR=#FFFFFF>”
ELSE
Response.Write ”<TR BGCOLOR=#EEEEEE>”
End If
n=1-n >
<TD><span ><A href=’view.asp?key=<=RS(”ID”)>’><=RS(”subject”)></A></span></td>
<TD><span ><=RS(”name”)></A></span></td>
<TD><span ><a href=”mailto:<=RS(”email”)>”><=RS(”email”)></a></span></TD>
<TD><span ><=RS(”postdate”)></span></td>
</TR>
<
RowCount = RowCount – 1
RS.MoveNext
Loop
set RS = RS.NextRecordSet
Loop
Conn.Close
set rs = nothing
set Conn = nothing
>
</TABLE >
<FORM METHOD=GET ACTION=”list.asp” >
<INPUT TYPE=”HIDDEN” NAME=”pageno” VALUE=”<=PageNo >” >
<
if PageNo >1 Then
response.write ”<INPUT TYPE=SUBMIT NAME=’ScrollAction’ VALUE=’ 上一页 ’>”
end if
if RowCount = 0 and PageNo <>Total then
response.write ”<INPUT TYPE=SUBMIT NAME=’ScrollAction’ VALUE=’ 下一页 ’>”
end if
response.write ”</FORM>”
End if
>
<End Sub %>
java取sql查出来的值,我想取这个page里面pageNo=2中的2,然后转换成int类型
概述:
PAGENO(””)取的是当前表页的物理编号,如果当前表页为第一个表页,则通过该函数取数取到的就是1,不论表页的名字是否写的是表页_1都能取到。
PAGENO(””)一般不会单独使用,通常是在表间取数的时候不需要手工录入表页的数字,可以直接通过该函数来取当前表页的编号。
将Object page = pages.get(0)改成
Map page = pages.get(0)
int i = page.get(”pageNo”)
以上就是关于vfp中_pageno用法全部的内容,如果了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!











