-1.html"><%=daohan("SmallClassName")%>

<%=Yifan_SmallClass_des%>

<% BigClassID=ad SmallClassID=b if not isnumeric(BigClassID) or not isnumeric(SmallClassID) then Response.Write "" Response.End() end if set rs=server.createobject("adodb.recordset") if BigClassID="" then exec="select * from products order by id desc" end if if BigClassID<>"" then exec="select * from products where SmallClassID="&BigClassID&" order by id desc" end if rs.open exec,conn,1,1 if rs.eof then response.Write " 暂无产品！" else rs.PageSize =""&TD_productsclass&"" '每页记录条数 iCount=rs.RecordCount '记录总数 iPageSize=rs.PageSize maxpage=rs.PageCount page=b 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 end if %> <%For i=1 To x%>
• -1.html" title="<%=rs("title")%>">" alt="<%=rs("title")%>" width="150" height="160" />
  <%=i5808(rs("title"),10)%>
<%rs.movenext next %>

<%'以下显示分页 call PageControl(iCount,maxpage,page,"border=0 align=center","

") rs.close set rs=nothing %>