asp³¤ÎÄÕ·ÖÒ³ÊÕ¼¯´æµµ

<%
if Request.QueryString("pageNo")="" then
PageNo=1
elseif IsNumeric(Request.QueryString("pageNo"))=false then
PageNo=1
else
PageNo=clng(Request.QueryString("pageNo"))
end if
´ò¿ªÊý¾Ý±í..²»Ð´Á˹þ.
set rs=server.CreateObject("adodb.recordset")
sql="............"
rs.open sql,conn,1,3
%>
<%
if rs.recordcount=0 then
%>
ÔÝÎÞ´ËÀàÎïÆ·
<%
else
rs.pagesize=30 'Ò³´óС
if PageNo<1 then
PageNo=1
end if
if PageNo>rs.pagecount then
PageNo=rs.pagecount
end if
rs.absolutepage=PageNo
i=0
do while i<rs.pagesize and not rs.eof
%>
ÄÚÈÝ<%=rs("×Ö¶Î")%>
<%
rs.movenext
i=i+1
loop
end if
%>
<div align="center">
¼Ç¼×ÜÊý:<%=rs.recordcount%>Ìõ µ±Ç°Ò³£º<%=PageNo%>/<%=rs.pagecount%>Ò³´óС£º<%=rs.pagesize%> <a href="?PageNo=1">Ê×Ò³</a> <a href="?PageNo=<%=PageNo-1%>">ÉÏÒ³</a> <a href="?PageNo=<%=PageNo+1%>">ÏÂÒ³</a> <a href="?PageNo=<%=rs.pagecount%>">Ä©Ò³</a> <input type=text id="goPage" value="<%=PageNo%>" size=2> <input type=button class="Mnue_003" onclick="location='?PageNo='+document.all.goPage.value;" value="GO">
<label></div>