<% id=request("id") if id="" then id=1 end if sql="select * from che_type where stype_id="&id set rs=server.CreateObject("adodb.recordset") rs.open sql,conn,1,3 if not rs.eof then bid=rs("btype_id") sql="update bche set liulan=liulan+1 where btype_id="&bid'更新浏览次数 conn.execute sql txt="where stype_id<>1 and productname like '%"&rs("stype_name")&"%'" %>
<%if rs("pic")<>"" then %> " onload="javascript:DrawImage(this,280,190);" /> <%pic="che/pic/"&rs("pic")%> <%end if %>
<% sql="select top 6 * from mall_product where stype_id<>1 and productname like '%"&rs("stype_name")&"%' order by productid desc" set rs1=server.CreateObject("adodb.recordset") rs1.open sql,conn,1,3 do while not rs1.eof%> <%loop rs1.close set rs1=nothing %>
·<%if not rs1.eof then %>" target="_blank" title="<%=rs1("productname")%>" class="font14_06"><%=left(rs1("productname"),20)%> <%rs1.movenext%> <%end if%>
<%end if rs.close set rs=nothing %>
<%'-----------------------所有车型下的具体车 sql="select * from mall_che2 where stype_id="&id&" order by upfilepic,productid desc" set rs1=server.CreateObject("adodb.recordset") rs1.open sql,conn,1,3 if not rs1.eof then %> <%do while not rs1.eof%> <%if not rs1.eof then %> <%rs1.movenext%> <%end if %> <%loop%> <%rs1.close set rs1=nothing '-----------------------所有车型下的具体车 end if %>
  车型列表
<%if trim(rs1("upfilepic"))<>"" then %> .html">" border="0" onload="javascript:DrawImage(this,170,100);" /> <%else%> <%if pic<>"" then%>.html"><%end if%> <%end if %>
  <%=rs1("productname")%>

<%if rs1("productdanwei")<>"" then %>    指导价:<%=rs1("productdanwei")%>万

<%end if %>   .html" target="_blank" class="font12_04">详细介绍..
<%'-----------------------4S店经销商 sql="select * from 4sdian2 where chexingID="&bid&" order by top_set desc,autoid desc" set rs1=server.CreateObject("adodb.recordset") rs1.open sql,conn,1,3 if not rs1.eof then %> <%do while not rs1.eof%> <%if not rs1.eof then %> <%rs1.movenext%> <%end if %> <%loop%> <%rs1.close set rs1=nothing '-----------------------4S店经销商 end if %>
  4S店经销商
经销商名称
销售热线 / 咨询热线
  " target="_blank" class="font14_04"><%=rs1("company")%> 查看该店所有车型
<%=rs1("phone")%>  <%=rs1("phone2")%>
<%'---------------------------- 4店经销商-%>
<%sql="select * from 4sdian2 where chexingid="&bid&" and opt=1 order by top_set desc,autoid desc" set rs=server.CreateObject("adodb.recordset") rs.open sql,conn,1,3 do while not rs.eof %> <%if not rs.eof then %> <%rs.movenext end if loop%>
   4店经销商  
 .html" target="_blank" class="font14_01"><%=rs("company")%>
<%if rs("pic")<>"" then %> .html" target="_blank">" alt="" width="84" height="61" border="0" class="table1" /> <%else%> 暂无图片 <%end if%>
电话:
 <%=rs("phone")%>
地址:
 <%=rs("address")%>
<%'---------------------------- 4店经销商-%> <%'---------------------------- 相关车型新闻-%>
   新闻动态
<% sql="select top 10 * from mall_product "&txt&" order by productid desc" set rs=server.CreateObject("adodb.recordset") rs.open sql,conn,1,3 if not rs.eof then do while not rs.eof %> <%if not rs.eof then %> <%rs.movenext end if %> <%if not rs.eof then %> <% rs.movenext end if %> <%loop end if rs.close set rs=nothing%>
.html" title="<%=rs("productname")%>" target="_blank" class="font12_01">·<%=left(rs("productname"),22)%>
.html" title="<%=rs("productname")%>" target="_blank" class="font12_01">·<%=left(rs("productname"),22)%>
<%'---------------------------- 相关车型新闻-%>