Question

asp 不要数据库分页问题

50以内的数字 按小到大分页 每页10个
dim tu
for tu = 0 to 50
response.write "<br/>test" & tu
next

这样可以取到50个数字 但是怎样分页呢？谢谢
如每页6个数字就是：
1
2
3
4
5
6
下一页

第2业就是
7
8
9
10
11
12
下一页 上一页

Answer 1

<%
dim tu,page
tu=50
psize=10
pcont=tu/psize

if request("page")="" then
page=1
else
page=int(request("page"))
end if
min=(page-1)*psize+1
max=page*psize
for i=min to max
if i<tu then
response.Write i&"<br>"
else
exit for
end if
next

for p=1 to pcont
if p<>page then
response.Write " <a href=?page="&p&">"&p&"</a> "
else
response.Write p
end if
next

%>

不懂的地方可以问我！

Answer 2

你这个没有连接到数据库啊，具体什么意思呢？
或者：

dim tu,tu2
tu=request("tu")
if tu="" then tu=1
for tu2 = (tu-1)*10+1 to tu * 10
response.write "test:" & tu2 & "<br/>"
next

dim p
for p = 1 to 5
response.write "<a href=""?tu=" & p & """>第 " & p & " 页</a> "
next

这样第1页就显示 （1-1）*10 + 1就是从1到10，第二页是11到20这样么？

追问

我补充问题了哦 就是不要数据库啊