<% classid=Trim(Request.QueryString("classid")) smallclassid=Trim(Request.QueryString("smallclassid")) %> <% set SEORs=Conn.execute("select * from SEO where ID=1") %> 产品中心-<%=SEORs("Title")%> " name="description"> " name="keywords"> "> "><% SEORs.close set SEORs=nothing %> <% If FuDongQQ=1 Then %> <% End If %>
产品中心
<% If ClassID="" and SmallClassID="" Then %>

产品中心

您的位置：首页>产品中心>信息列表

<% ElseIf ClassID<>"" and SmallClassID="" Then %> <% set BigClass_Rs=server.CreateObject("adodb.recordset") BigClass_Sql="select top 1 * from [BigClass] where BigClassID="&ClassID&" order by BigClassID" BigClass_Rs.open BigClass_Sql,conn,1,2 %>

<%= BigClass_Rs("BigClassName") %>

您的位置：首页>产品中心>" title="<%= BigClass_Rs("BigClassName") %>"><%= BigClass_Rs("BigClassName") %>>信息列表

<% BigClass_Rs.close Set BigClass_Rs=nothing %> <% Else %> <% set BigClass_Rs=server.CreateObject("adodb.recordset") BigClass_Sql="select top 1 * from [BigClass] where BigClassID="&ClassID&" order by BigClassID" BigClass_Rs.open BigClass_Sql,conn,1,2 set SmallClass_Rs=server.CreateObject("adodb.recordset") SmallClass_Sql="select top 1 * from [SmallClass] where BigClassID="&ClassID&" and SmallClassID="&SmallClassID&" order by SmallClassID" SmallClass_Rs.open SmallClass_Sql,conn,1,2 %>

<%= SmallClass_Rs("SmallClassName") %>

您的位置：首页>产品中心>" title="<%= BigClass_Rs("BigClassName") %>"><%= BigClass_Rs("BigClassName") %>>&SmallClassID=<%= SmallClass_Rs("SmallClassID") %>" title="<%= SmallClass_Rs("SmallClassName") %>"><%= SmallClass_Rs("SmallClassName") %>>信息列表

<% BigClass_Rs.close Set BigClass_Rs=nothing SmallClass_Rs.close Set SmallClass_Rs=nothing %> <% End If %>
    <% set rs=server.CreateObject("adodb.recordset") If classid="" and smallclassid="" then sql="select * from [Product] where Passed=true order by zd asc, tj asc, px desc, ID desc" ElseIf classid<>"" and smallclassid="" then if not IsNumeric(classid) then response.Redirect("index.asp") response.End() else sql="select * from [Product] where Passed=true and ClassID="&classid&" order by zd asc, tj asc, px desc, ID desc" End If ElseIf classid<>"" and smallclassid<>"" then if not IsNumeric(classid) and not IsNumeric(smallclassid) then response.Redirect("index.asp") response.End() else sql="select * from [Product] where Passed=true and ClassID="&classid&" and SmallClassID="&smallclassid&" order by zd asc, tj asc, px desc, ID desc" End If else sql="select * from [Product] where Passed=true order by zd asc, tj asc, px desc, ID desc" end if rs.open sql,conn,1,2 if rs.bof and rs.eof then response.Write("没有相关信息!!!") PageScript="ML" else if rs.recordcount=1 then response.Redirect("productshow.asp?id="&rs("ID")&"") response.End() end if '分页的实现 listnum=20 '每页显示12条纪录 Rs.pagesize=listnum pageMax=rs.pagecount listCount=rs.recordcount page=Request("page") if (page-pageMax) > 0 then page=pageMax elseif page = "" or page < 1 then page = 1 end if rs.absolutepage=page '编号的实现 j=listCount j=j-(page-1)*listnum i=0 nn=request("page") if nn="" then n=0 else nn=nn-1 n=listnum*nn end if do while not rs.eof and i
  • ">" width="207" height="155" alt="<%= rs("Title") %>">
    " class="tit"><%= strvalue(rs("Title"),24) %>
    • <% rs.movenext i=i+1 j=j-1 loop end if %>
<% rs.close set rs=nothing %>