<%if title<>"" then%><%=title%><%else%><%=rs("pinpai")%>

<%dim body body=Delurl(rs("body")) set rskey=server.CreateObject("adodb.recordset") sqlkey="select * from keyname where len(keyname)>1 and len(keyname)<20 order by len(keyname) desc" rskey.open sqlkey,conn,1,1 while not rskey.eof body=replace(body,rskey("keyname"),"##"&rskey("keyid")&"##",1,1) rskey.movenext wend set rskey=server.CreateObject("adodb.recordset") sqlkey="select * from keyname order by len(keyname) desc" rskey.open sqlkey,conn,1,1 while not rskey.eof body=replace(body,"##"&rskey("keyid")&"##",""&rskey("keyname")&"",1,1) rskey.movenext wend response.Write(body) %><%if len(Delhtml(rs("body")))<500 then%>
公司简介

<%Set rs3 = Server.CreateObject("ADODB.Recordset") sql3="select body from About where id=1" rs3.open sql3,conn,1,3 body=left(Delurl(rs3("body")),440) %><% set rskey=server.CreateObject("adodb.recordset") sqlkey="select * from keyname where len(keyname)>1 and len(keyname)<20 order by len(keyname) desc" rskey.open sqlkey,conn,1,1 while not rskey.eof body=replace(body,rskey("keyname"),"##"&rskey("keyid")&"##",1,1) rskey.movenext wend set rskey=server.CreateObject("adodb.recordset") sqlkey="select * from keyname order by len(keyname) desc" rskey.open sqlkey,conn,1,1 while not rskey.eof body=replace(body,"##"&rskey("keyid")&"##",""&rskey("keyname")&"",1,1) rskey.movenext wend response.Write(body) %>...【更多介绍】

<%end if%>

<%=pinpai%>品牌产品

<% set tuijian=server.createobject("adodb.recordset") exec="select top 10 * from products where fb=1 and pinpaiID="&pinpaiID&" order by id desc " tuijian.open exec,conn,1,1 if tuijian.eof and tuijian.bof then response.Write(" 暂无推荐产品 !") end if %>

<% dim ii ii=1 do while not tuijian.eof %> <% if ii mod 5 =0 then response.Write "" end if ii=ii+1 tuijian.movenext loop tuijian.close set tuijian=nothing %>

" class="img" target=_blank>

" width="110" height="90" />

" title="<%=tuijian("title")%>" target=_blank><%=InterceptString(tuijian("title"),25)%>

品牌导航

产品导航

<%=rs("pinpai")%>