vfp中_pageno用法

vfp中_pageno用法

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 >。