classid=request.("classid")
set rs=Server.CreateObject("ADODB.RecordSet")
rs.open"SELECT * FROM [ 行业设备 ] WHERE leixing="&classid,conn,1,1
do while not rs.eof
------------------显示筛选内容---------------
rs.movenext
loop
rs.close
set rs=nothing
classid=request.("classid")'获取行业ID值
set rs=Server.CreateObject("ADODB.RecordSet")
rs.open"SELECT * FROM [ 行业设备 ] WHERE leixing="&classid,conn,1,1 '建立行业ID相同的企业纪录集
do while not rs.eof '纪录集不为空,循环输出纪录
------------------显示筛选内容---------------
rs.movenext
loop
rs.close'关闭纪录集
set rs=nothing'清空