<% dim search_sql,search_nclass,filego search_nclass=request("nclass") filego="product.asp?nclass="&search_nclass search_sql="select * from [product] where 1=1" if search_nclass<>"" then search_sql=search_sql & " and p_class="&search_nclass else filego="product.asp" end if search_sql=search_sql & " order by id desc" set rs=Server.CreateObject("ADODB.RecordSet") rs.open search_sql,conn,1,1 'response.write search_sql 'response.write filego 'response.end %> <% if search_nclass<>"" then sql3="select * from product_class where id="&search_nclass Set rs3 = Server.CreateObject("ADODB.Recordset") rs3.open sql3,conn,1,1 if not rs3.eof then p_class_name=rs3("p_class_name") end if rs3.close() set rs3=nothing end if %> <%=p_class_name%>_<%=website_name%>

电脑产品分类

网站首页 >> 产品展示 >> <%=p_class_name%>
<% if filego<>"product.asp" then filego2=filego&"&" else filego2="product.asp?" end if if page>2 then s1=page-2 else s1=1 if page=2 then response.write ".." for j=s1 to s2 if j=page then response.write ""&j&" " else response.write ""&j&" " end if next if s2
<% set rs=nothing %>