产品 展示>> <% dim rspro,sqlpro,proid,bigid,smallid bigid=clng(request("bigid")) smallid=clng(request("smallid")) proid=clng(request("proid")) set rspro=server.createobject("adodb.recordset") sqlpro="select * from article where bigclassid="&bigid&" and smallclassid="&smallid&" and article_id="&proid rspro.open sqlpro,conn,1,1 %> <% dim rsbigclass,rssmallclass,sqlbigclass,sqlsmallclass set rsbigclass=server.createobject("adodb.recordset") if bigid<>0 then sqlbigclass="select * from bigclass where bigclassid="&bigid rsbigclass.open sqlbigclass,conn,1,1 if not rsbigclass.eof then response.write "" response.write rsbigclass("bigclassname") response.write "" rsbigclass.close set rsbigclass=nothing end if end if set rssmallclass=server.createobject("adodb.recordset") if smallid<>0 then sqlsmallclass="select * from smallclass where smallclassid="&smallid rssmallclass.open sqlsmallclass,conn,1,1 if not rssmallclass.eof then response.write "" response.write " >>" response.write rssmallclass("smallclassname") response.write "" rssmallclass.close set rssmallclass=nothing end if end if %>