<!--#include file="top.asp" -->
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr><!--产品开始 -->
<td><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td class="centerleft"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><!--左侧分类开始 -->
<script language="javascript" src="left.asp?action=left&anclassid=<%=request("anclassid")%>&nclassid=<%=request("nclassid")%>"></script></td>
</tr>
<tr>
<td><!--左侧新闻开始 -->
<%set rs=server.createobject("adodb.recordset")
rs.open"select top 10 * from news_moban where searchkey like '%今日%' order by updatetime desc",conn,1,1
if rs.eof then
else
response.write"<table width='100%' border=0 cellspacing=0 cellpadding=0><tr><td style=padding-left:2px;padding-bottom:5px;padding-top:5px>"
response.write"<span class=channelspan>今日行情</span></td></tr>"
while not rs.eof
text=rs("title")
response.write"<tr><td style=padding-left:5px><a href="&rs("pathlink")&" target=_blank class=00>"&get22Length(text)&"</a></td></tr>"
rs.movenext
wend
end if
response.write"</table>"
rs.close
set rs=nothing%></td>
</tr>
</table></td>
<td valign="top" class="main1">

<table border="0" cellspacing="0" cellpadding="0">
<%dim selectbookid
selectbookid=request("selectbookid")
if selectbookid="" then
response.write "<span style='height:500px;font-size:12px;padding-top:200px;padding-left:150px;color:red'>请选择至少两款产品进行比较</span><script>window.setTimeout(""history.go(-1)"",1000);</script>"
elseif instr(selectbookid,",")<=1 then
response.write "<span style='height:500px;font-size:12px;padding-top:200px;padding-left:150px;color:red'>请选择至少两款产品进行比较</span><script>window.setTimeout(""history.go(-1)"",1000);</script>"
else
set rs=server.createobject("adodb.recordset")
rs.open"select * from price where bookid in ("&selectbookid&") order by updatetime desc",conn,1,1%>
<tr>
<%while not rs.eof
money=split(rs("money"),"|")
Rcontent = rs("content")
Rcontent = replace(Rcontent, "&gt;", ">")
Rcontent = replace(Rcontent, "&lt;", "<")
Rcontent = Replace(Rcontent, "&nbsp;", CHR(32))
Rcontent = Replace(Rcontent, "", CHR(13))
%>
<td valign="top" style="border-left:1px solid #cccccc">
<table border="0" cellspacing="0" cellpadding="3">
<tr><td class=pricelist1><%=rs("bookname")%></td></tr>
<tr><td><span class=price style="width:100px;height:25px">报价:<%=money(1)%>元</span></td></tr>
<tr><td><a href="<%=rs("booklink")%>"><img src="../<%=rs("pic1")%>" class="img" height="60" width="80"></a></td></tr>
<tr><td bgcolor="f7f7f7"><%=replace(rs("hid"),"|","<br>")%></td></tr>
<tr><td><%=Rcontent%></td></tr>
</table></td>
<%rs.movenext
wend
rs.close
set rs=nothing
end if%>
</tr></table></td>
<td class="centerleft"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><!--右侧分类开始 -->
<script language="javascript" src="left.asp?action=right&nclassid=<%=request("nclassid")%>"></script></td>
</tr>
<tr>
<td style="padding-left:3px"><%set rs=server.createobject("adodb.recordset")
rs.open"select * from shjia where flag=2 order by num,tj desc",conn,1,1
if not rs.eof then
response.write"<span class=channelspan>推荐商家</span><br>"
i=0
do while not rs.eof
shjianame=replace(rs("name"),"青岛","")
shjianame=replace(shjianame,"有限","")
shjianame=replace(shjianame,"公司","")
shjianame=replace(shjianame,"科技","")
shjianame=replace(shjianame,"技术","")
shjianame=replace(shjianame,"专卖","")
response.write"<img src=../image/jian.gif border=0>&nbsp;"
response.write"<a href=../user/index.asp?id="&rs("shjiaid")&" target=_blank class=00>"&shjianame&"</a><br>"
response.write" "&rs("tel")&"<br> "
rs.movenext
i=i+1
if i>=10 then exit do
loop
end if
rs.close
set rs=nothing%></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
<tr><td><!--#include file="../copyright.asp" --></td></tr></table>
</body>
</html>