<%
currentpage=request("page")
order=request("order")
if currentpage <>"" then
currentpage=clng(currentpage)
else
currentpage=1
end if
maxperpage=5
i=1
totalpage=1
totalrecords=0
strfile="liuyan.asp"
set rs1=server.createobject("adodb.recordset")
sql="select * from thly "
rs1.open sql ,conn,1,3
if not(rs1.bof and rs1.eof) then
rs1.pagesize=maxperpage
rs1.absolutepage=currentpage
totalpage=rs1.pagecount
totalrecords=rs1.recordcount
end if
%>
