<!--#include file="system/conn.asp"--><%
%><!DOCTYPE html>
<html>
<head>
<meta charset=utf-8" />
<meta name="format-detection" content="telephone=no" />
<meta name="viewport" content="width=device-width, initial-scale=1.0, maximum-scale=1.0, minimum-scale=1.0, user-scalable=no">
<meta name="keywords" content="<%=keywords%>" />
<meta name="description" content="<%=description%>" />
<title><%=indexwebname%></title>
<link rel="stylesheet" type="text/css" href="s/c.css?ver=1030" />
</head>
<body>
<div id="container">
<%Call subTop()%>
<div class="pt">产品推荐<span>Products</span></div><%Set Rs=Server.CreateObject("ADODB.RecordSet")
Rs.Open "Select top 1 * From gg",Conn,1,1
If Not Rs.Bof And Not Rs.Eof Then
	indexc_ad1=Rs("indexc_ad1")
	indexc_ad1url=Rs("indexc_ad1url")
	indexc_ad1title=Rs("indexc_ad1title")
End If
Rs.Close%><%If indexc_ad1<>"" Then%>
<div class="hp"><img src="<%=WebUrl & indexc_ad1%>" alt="<%=indexc_ad1title%>" /><p><a href="<%=indexc_ad1url%>" target="_blank"><%=indexc_ad1title%></a></p></div><%End If%>
<ul class="pl"><%

Rs.Open "Select Top 5 cp.id As id,cpmc,cpjj,cpslt,cpdescription,gjtb From cp Left Join gj On gj.id=cp.gjid Where cpstate>0 And syxs>0 Order By sypx Desc,cp.id Desc",Conn,1,1
Do While Not Rs.Bof And Not Rs.Eof
id=Rs("id"):cpmc=Rs("cpmc"):cpjj=StrLeft(RemoveHTML(HTMLUnCode(Rs("cpjj"))),60):cpslt=Rs("cpslt"):gjtb=Rs("gjtb")
%><li>
<div class="i"><%If cpslt<>"" Then%><img src="wap_img.asp?imgw=83&url=<%=WebUrl&cpslt%>" /><%Else%><img src="/images/nopic.gif" /><%End If%></div>
<a href="p.asp?id=<%=id%>" title="<%=cpmc%>"><%=cpmc%></a>
<p><%=cpjj%></p>
</li><%
Rs.MoveNext
Loop
Rs.Close

%>
</ul>
<p class="pm"><a href="pl.asp" title="产品大全">点击查看更多>></a></p>
<%Call subBottom()%>
</div>
</body>
</html><%Conn.Close:Set Conn=Nothing%>