% dim sortid,show,sf,city,datetime,sql,rslist,icolor,rssort
if Chkrequest(request("sortid")) then
sortid=request("sortid")
else
Response.Redirect ("../login/chklogin.asp?login=4")
end if
show=replace_text(request("show"))
country=Replace_Text(request("country1"))
sf=Replace_Text(request("province"))
city=Replace_Text(request("city"))
datetime=replace_text(request("datetime"))
%> <%
sql="select productshow.*,corporation.id as corid,corporation.flag as corflag,corporation.qymc,corporation.country,corporation.sf,corporation.city,corporation.web,corporation.url,corporation.trust_score from productshow,corporation where productshow.sortid="&sortid&" and corporation.id=productshow.gsid and productshow.flag=1"
if country>"" then sql=sql&" and corporation.country='"&country&"'"
if sf>"" then sql=sql&" and corporation.sf='"&sf&"'"
if city>"" then sql=sql&" and corporation.city='"&city&"'"
if datetime="1" then sql=sql&" and productshow.idate>=date()-1"
if show="trust_score" then
sql=sql&" order by corporation.trust_score desc"
else
sql=sql&" order by productshow.id desc"
end if
Set rslist= Server.CreateObject("ADODB.Recordset")
rslist.open sql,conn,1,1
msg_per_page=20 '定义每页显示记录条数
%>
导航:供求商机 >>
我要采购 >> 查看供应信息 >>
<%
dim Found
sqlsort="select * from Class_1 where sortid="&sortid&""
set rssort=conn.execute(sqlsort)
if not rssort.eof then
Found = True
response.write""&rssort("sort")&""
else
response.write "产品展示栏目"
end if
%>
“<%if Found = True then response.write rssort("sort") end if%>”的供应商机共 <%if Found=True then response.write (totalrec+yijicount_sale+yijicount_cor) end if%>
条
多乐会员 |
网上有名
供应信息(<%if Found=True then response.write yijicount_sale end if%>)
<%if datetime="1" then
response.write"所有产品"
else
response.write" "
end if%> <%if datetime="1" then
response.write" "
else
response.write"今日最新产品"
end if
%> 管理产品
发布产品
按关键字订阅商讯
产品目录 <%'if totalrec>0 then response.write"("&totalrec&")" else response.write"(0)" end if%>
相关公司(<%if Found=True then response.write yijicount_cor end if%>)
<%
if rslist.eof or rslist.bof then
response.Write"