<%if request("smallid")<>"" then
smallid=trim(request("smallid"))
sql="select * from product where smallid="&smallid&" order by proid desc"
else
sql="select * from product order by bigid asc , proid desc"
end if
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,1
if rs.eof and rs.bof then%>
暫無信息
<%else
rs.pagesize=6
page = cint(request("page"))
if page = "" then page = 1
if not(isnumeric(page)) then page=1
if page<1 then page=1
if page >= rs.pagecount then page = rs.pagecount
rs.absolutepage = page%>
<%for j=1 to rs.PageSize%>
<%rs.movenext
if rs.eof then exit for
next
end if%>
共有記錄<%=rs.recordcount%>條 <%=page%>/<%=rs.pagecount%>
上一頁
下一頁
<%rs.close:set rs=nothing%>
