<% BigClassID=request.QueryString("BigClassID") SmallClassID=request.QueryString("SmallClassID") if not isnumeric(BigClassID) or not isnumeric(SmallClassID) then Response.Write "" Response.End() end if if SmallClassID<>"" then set smallclass=server.createobject("adodb.recordset") exec="select * from [smallclass] where SmallClassID="&SmallClassID&"" smallclass.open exec,conn,1,1 bgname1=" > "&smallclass("SmallClassName") end if if BigClassID<>"" then set bigClass=server.createobject("adodb.recordset") exec="select * from [bigClass] where BigClassID="&BigClassID&"" bigClass.open exec,conn,1,1 bgname2=trim(bigClass("BigClassName")) end if if SmallClassID="" and BigClassID="" then bgname="产品展示" End If %> <%=bgname%><%=bgname2%><%=bgname1%>_<%=w78_home%>
当前位置:首页 > 产品展示 > <%=bgname2%><%=bgname1%>
<% BigClassID=request.QueryString("BigClassID") SmallClassID=request.QueryString("SmallClassID") 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 px_id asc" end if if BigClassID<>"" then exec="select * from products where BigClassID="&BigClassID&" order by px_id asc" end if if BigClassID<>"" and SmallClassID<>"" then exec="select * from products where BigClassID="&BigClassID&" and SmallClassID="&SmallClassID&" order by px_id asc" end if rs.open exec,conn,1,1 if rs.eof then response.Write "
暂无产品!" else rs.PageSize =""&config("productsclass")&"" 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 end if For i=1 To x %> <% rs.movenext next %>
<%'以下显示分页 call PageControl(iCount,maxpage,page,"border=0 align=center","

") rs.close set rs=nothing %>