Here is a detailed tutorial on pagination functions commonly used asp. The method is very simple. Interested friends, let’s learn about it with the editor!
The code copy is as follows:
rs.opensql,conn,1,1
ifrs.eofandrs.bofthen
response.write"
"
else
totalPut=rs.recordcount
mapperpage=18
ifcurrentpage
currentpage=1
endif
if(currentpage-1)*maxperpage>totalputthen
if(totalputmodmaxperpage)=0then
currentpage=totalput/maxperpage
else
currentpage=totalput/maxperpage+1
endif
endif
ifcurrentpage=1then
showpage1totalput,maxperpage,"infotype.asp?id="&request("id")
showcontent()
showpagetotalput,maxperpage,"infotype.asp?id="&request("id")
else
if(currentpage-1)*maxperpage
rs.move(currentpage-1)*maxperpage
dimbookmark
bookmark=rs.bookmark
showpage1totalput,maxperpage,"infotype.asp?id="&request("id")
showcontent
showpagetotalput,maxperpage,"infotype.asp?id="&request("id")
else
currentpage=1
showpage1totalput,maxperpage,"infotype.asp?id="&request("id")
showcontent
showpagetotalput,maxperpage,"infotype.asp?id="&request("id")
endif
endif
endif
%>
subshowcontent()
%>
ID
choose
Information title
Update date
Click
Add people
edit
delete
Generate [Zero]
i=1
dowhilenotrs.eof
%>
">
"target="_blank">[]
strcounts=truelen(thetitle1)
response.writethetitle1
%>
datetime=rs("datetime")
yname=year(datetime)
mname=month(datetime)
iflen(mname)
dname=month(datetime)
iflen(dname)
foldername=yname&mname
%>
/.htm"title="View generated static page"target="_blank">
">Modify
)">Delete
)">Generate(','','width=0,height=0')">)
i=i+1
ifi>maxperpagetheneexitdo
rs.movenext
loop
%>
ID
choose
Information title
Update date
Click
Add people
edit
delete
generate
endsub
%>
functionshowpage(totalnumber,maxperpage,filename)
%>
dimn
iftotalnumbermodmaxperpage=0then
n=totalnumber/maxperpage
else
n=totalnumber/maxperpage+1
endif
%>
There are / items in total,
Current page/
[Home][Previous Page]
">[Home]&page=">[Previous Page]
[Next Page][Last Page]&page=">[Next Page]&page=">[Last Page]
Go to:
onChange="location.href=this.options[this.selectedIndex].value">
ifcurrentpage=jthen
%>&page="selected>
else
%>
&page=">
endif
next
%>
endfunction
%>
functionshowpage1(totalnumber,maxperpage,filename)
%>
dimb
iftotalnumbermodmaxperpage=0then
b=totalnumber/maxperpage
else
b=totalnumber/maxperpage+1
endif
%>
There are / items in total,
Current page/
dxystart=currentpage-5
ifdxystart
dxyend=currentpage+5
ifdxyend>bthendxyend=b
fordxy=dxystarttodxyend
ifdxy=currentpagethen
response.write"["&""&dxy&""&"]"&"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""" =red>
else
response.write"["&dxy&""&"]"&"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
endif
next
%>
endfunction
%>
rs.close
setrs=nothing
conn.close
setconn=nothing
%>
The above is a detailed tutorial on Asp pagination functions. I believe you have learned about it. For more related content, please continue to pay attention to the WoNew Technology Channel.