产品中心
-
<%
set rs=server.createobject("adodb.recordset")
exec="select * from shop order by px_id asc,id desc"
rs.open exec,conn,1,1
if rs.eof then
response.Write " 暂时产品!"
else
rs.pagesize = plist_num
allpage = rs.pagecount
allcount = rs.recordcount
'接收传过来的page页码
page=request.QueryString("page")
iCount=rs.RecordCount '记录总数
iPageSize=rs.PageSize
maxpage=rs.PageCount
page=request("page")
if Not IsNumeric(page) or page="" then
page=1
else
page=cint(page)
end if
if page<1 then
page=1
elseif page>maxpage then
page=maxpage
end if
rs.AbsolutePage=Page
if page=maxpage then
x=iCount-(maxpage-1)*iPageSize
else
x=iPageSize
end if
%>
<%For i=1 To x%>
-
.html" title="<%=rs("title")%>">" class="prodthumb" width="145" height="145"/>
.html" title="<%=rs("title")%>"><%=left(rs("title"),24)%>
<%
rs.movenext
next
end if
%>
<%'以下显示分页
call PageControl(iCount,maxpage,page,"border=0 align=center","
") rs.close set rs=nothing %>