<%set rs=server.createobject("adodb.recordset") rs.open "select a.*,b.anclass from shop_books a,shop_anclass b where a.anclassid=b.anclassid and a.kucun>-98 order by a.adddate desc",conn,1,1 if rs.recordcount=0 then %>

暂无商品

<% else rs.PageSize =20 '每页记录条数 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 %> <%rs.movenext next %> 培训资料名称 盘数 定价 培训分类 操作

<% end if rs.close set rs=nothing %>