ASP 数组的分页显示问题

来源：百度知道 编辑：UC知道 时间：2024/05/23 20:28:47
思路是这样的，
数据库中有haoyou这个字段，里面存储1|2|3|4|5|等
我用data=split(haoyou,"|") 将里面的数据存放在data里,
然后要将data里面的数据分页显示出来。
我自己写了一个，只能显示数据，但是不能分页，因为字数限制代码发不上来，基本要求就是这样....很急很急...希望快点解决
是这样的，我是可以做到显示，但是点击“下一页”的时候却没反应

psize = 2 '每页显示数
cpage = 5 '当前页数

for i = 0+(cpage-1)*psize to (psize-1)+(cpage-1)*psize
if i > ubound(data) then exit for
Response.Write data(i) & "<br>"
next

那你也得把具体代码贴出来看看。

你的意思是1 2 3 4 5
每个数字占一页
如果是这个的话 你用mid函数 每页显示1个字符

<%
dim aa,bb,page
aa="1|2|3" \\可以是你的字段名<%=rs("haoyou")%>
bb=split(aa,"|")
page=request("page")
if page="" or not isnumeric(page) then
page=1
else
page=cint(page)
end if
if page<1 then page=1
if page>ubound(bb)+1 then page=ubound(bb)+1
response.write bb(page-1)&"<br>"
%>
<%
For page = 0 to ubound(bb)
%>
<a href="?page=<%=page+1%>" ><%=page+1%></a> <% Next %>页