<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<% data_path=""%>
<!--#include file="conn/conn.asp"-->
<!--#include file="inc/safe.asp"-->
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title><%=WebName%>--区域</title>
<style >

  .tdc{
 	filter:	progid:DXImageTransform.Microsoft.Gradient(GradientType=1, StartColorStr=#FFFFFF, EndColorStr=#EEEEEE);
}.tdc1{
 
	filter:	progid:DXImageTransform.Microsoft.Gradient(GradientType=1, StartColorStr=#FFFFFF, EndColorStr=#94ABD6);
}.tdc2{
 
	filter:	progid:DXImageTransform.Microsoft.Gradient(GradientType=1, StartColorStr=#94ABD6, EndColorStr=#FFFFFF);
}
 image{ border:none;}

</style>
</head>
<body>
<!--#include file="inc/head.asp"-->
<br />
<%
qtype=Replace_Text(request("qtype"))
sf=Replace_Text(request("sf"))
city=Replace_Text(request("city"))
%>

<SCRIPT language=JavaScript src="<%=HOPE_InstallDir%>mall.js"  type=text/JavaScript></SCRIPT>

 <DIV id=popImageLayer 
style=" background-color:#F6F6F6;BORDER-RIGHT: orange 1pt none; BORDER-TOP: orange 1pt none; VISIBILITY: hidden; BORDER-LEFT: orange 1pt none; WIDTH: 180px; CURSOR: hand; BORDER-BOTTOM: orange 1pt none; POSITION: absolute; HEIGHT: 180px" 
align=center calss="" name="popImageLayer"></DIV>
<table width="<%=HOPE_PageWidth%>" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#F0F2F4" bgcolor="#EEEEEE">
                <tr><td colspan="2" height="30">&nbsp;<b><font color="#0099CC">最近搜索词</font></b>: <%=Replace(Request.Cookies("zhuyongjian"),",","&nbsp;&nbsp;<font color=#E7E7E7>|</font>&nbsp;&nbsp;")%></td>
                </tr>  <tr>
                  <td width="11%"  height="40" bgcolor="#F2F2F2" >&nbsp;<b>站内搜索</b>：</td>
                  <td width="89%" bgcolor="#FCFCFE" > 
                  <% response.Write("&nbsp;<b><font color=red>→</font></b> 〖<a href='"&HOPE_InstallDir&"search/searchproduct.asp'>产品搜索</a>〗 〖<a href='"&HOPE_InstallDir&"search/searchCom.asp'>公司搜索</a>〗 〖<a href='"&HOPE_InstallDir&"search/News_search.asp'>资讯搜索</a>〗 〖<a href='"&HOPE_InstallDir&"search/searchhelp.asp'>帮助搜索</a>〗〖<a href='"&HOPE_InstallDir&"search/searchsale.asp'>供应搜索</a>〗 〖<a href='"&HOPE_InstallDir&"search/searchbuy.asp'>求购搜索</a>〗〖<a href='"&HOPE_InstallDir&"search/searchvipinfo.asp'>专项商机搜索</a>〗 〖<a href='"&HOPE_InstallDir&"corporation/sitemap.html' target=_blank>行业类别导航</a>〗")%></td>
 		        </tr>				 
</table>
<table width="<%=HOPE_PageWidth%>" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#EEEEEE">
<tr><td height="30" align="center">
 <font color="red">★</font><A href="<%=HOPE_InstallDir%>allcom.asp">网上有名</A>&nbsp;&nbsp;|&nbsp;&nbsp;<a href="<%=HOPE_InstallDir%>allcom.asp?ctype=2">推荐企业</a>&nbsp;|&nbsp;<A href="<%=HOPE_InstallDir%>alltradeinfo.asp?ctype=0">所有供应信息</A>&nbsp;&nbsp;|&nbsp;&nbsp;<A href="<%=HOPE_InstallDir%>alltradeinfo.asp?ctype=1">所有求购信息</A>&nbsp;|&nbsp;<a href="<%=HOPE_InstallDir%>allpro.asp">所有产品</a>&nbsp;&nbsp;|&nbsp;&nbsp;<a href="<%=HOPE_InstallDir%>addrinfo.asp">区域服务</a>
&nbsp;&nbsp;|&nbsp;&nbsp; <a href="<%=HOPE_InstallDir%>search/searchSimple.asp">简略搜索</a>&nbsp;&nbsp;|&nbsp;&nbsp;<a href="<%=HOPE_InstallDir%>search/searchall.asp">高级搜索</a></td>
</tr></table>
<table width="<%=HOPE_PageWidth%>" height="20"  border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> <td height=10    width="50%"  class=tdc1></td> 
 <td     width="50%" class=tdc2></td>
</tr></table>


<table border="1"  bordercolor="#F6F6F6" height="100"  cellpadding="0" cellspacing="0" align="center" width="<%=HOPE_PageWidth%>">
  <tr><td colspan="7">
  <table width="100%" border="0" align="left" cellpadding="0" cellspacing="0" bgcolor="#EEEEEE">
	    <tr><td height="30" colspan="3">
	  &nbsp;<a href="<%=HOPE_InstallDir%>">首页</a> > <b>区域服务</b>(含有会员的区域直通道):</td>
	    &nbsp;&nbsp;
	  <td align="center" 
	  <%
	  if qtype="trade" then
      %>
	  bgcolor="#98AED7"  
	  <%
	  end if
	  %>
 	  ><a href="<%=HOPE_InstallDir%>addrinfo.asp?qtype=trade" ><%if qtype="trade" then%><font color="#ffffff"><b>区域供应</b></font><%else%>区域供应<%end if%></a> </td>
	 <td  align="center" 
	  <%
	  if qtype="buy" then
      %>
	  bgcolor="#98AED7"
	  <%
	  end if
	  %>  height="20" 
 	  ><a href="<%=HOPE_InstallDir%>addrinfo.asp?qtype=buy"  ><%if qtype="buy" then%><font color="#ffffff"><b>区域商机</b></font><%else%>区域商机<%end if%></a> </td>
	   <td align="center" 
	  <%
	  if qtype="com" then
      %>
	  bgcolor="#98AED7"
	  <%
	  end if
	  %>
 	  ><a href="<%=HOPE_InstallDir%>addrinfo.asp?qtype=com" ><%if qtype="com" then%><font color="#ffffff"><b>区域企业</b></font><%else%>区域企业<%end if%></a></td>
	  <td align="center" 
	  <%
	  if qtype="pro" then
      %>
	  bgcolor="#98AED7"
	  <%
	  end if
	  %>
 	  > <a href="<%=HOPE_InstallDir%>addrinfo.asp?qtype=pro"  ><%if qtype="pro" then%><font color="#ffffff"><b>区域产品</b></font><%else%>区域产品<%end if%></a>	  </td>
	    </tr></table>
  </td></tr><tr><td height="20" colspan="3">
&nbsp;区域：<%=sf%>--<%=city%>
</td>
  </tr>
<%
 Set rs=Server.CreateObject("adodb.recordset")
 if qtype<>"" then
 if qtype="trade" or qtype="buy" then
 if trim(sf&"ok")<>"ok" then
 cona="  and yixiang_corporation.sf like '%"&sf&"%'"
end if
if trim(city&"ok")<>"ok" then
cona=cona&" and yixiang_corporation.city like '%"&city&"%'"
end if
 end if
sql="select yixiang_Info.Info_ID,yixiang_Info.showname,yixiang_Info.sortid,yixiang_Info.typeid,yixiang_Info.typeid_2,yixiang_Info.gsid,yixiang_Info.draw,yixiang_Info.type,yixiang_Info.content  from yixiang_Info,yixiang_corporation  where yixiang_Info.Info_ID<>0 and yixiang_corporation.flag=1 and yixiang_Info.flag=1   and yixiang_corporation.id=yixiang_info.gsid  "&cona&" "  

if qtype="trade" then
	sql=sql&" and yixiang_Info.type='卖'"
 elseif qtype="buy" then
	sql=sql&" and yixiang_Info.type='买'"
 elseif qtype="com" then
	if trim(sf&"ok")<>"ok" then
	 confi="  and yixiang_corporation.Sf='"&sf&"'"
	end if
	if trim(city&"ok")<>"ok" then
	confi=confi&"  and yixiang_corporation.city='"&city&"'"
	end if
	sql="select [user],cimg,Country,flag,idate,Sf,City,gradeid,Address,Qyjj,Qymc,gradeid  from yixiang_corporation  where  flag=1     "&confi&" order by  trust_score desc " 
	 
elseif qtype="pro" then
	if trim(sf&"ok")<>"ok" then
	 conp="  and yixiang_corporation.Sf='"&sf&"'"
	end if
	if trim(city&"ok")<>"ok" then
	conp=conp&"  and yixiang_corporation.city='"&city&"'"
	end if
	sql="select yixiang_productshow.id,yixiang_productshow.Cpmc,yixiang_productshow.Picture,yixiang_productshow.Xxsm,yixiang_productshow.SortID,yixiang_productshow.GsID,yixiang_productshow.typeid,yixiang_productshow.typeid_2,yixiang_corporation.gradeid,yixiang_corporation.Qymc,yixiang_corporation.[user] from yixiang_productshow,yixiang_corporation  where  yixiang_productshow.flag=1  and yixiang_corporation.flag=1 and  yixiang_corporation.id=yixiang_productshow.gsid    "&conp&"     order by yixiang_productshow.idate"  
	
 else  
	 
	sql="select [user],cimg,Country,flag,idate,Sf,City,gradeid,Address,Qyjj,Qymc  from yixiang_corporation  where flag=1  order by  trust_score desc " 
 end if
 else
 	sql="select [user],cimg,Country,flag,idate,Sf,City,gradeid,Address,Qyjj,Qymc  from yixiang_corporation  where flag=1  order by  trust_score desc " 

end if
    rs.open sql,conn,1,1
 	msg_per_page=26 '定义每页显示记录条数
 %>
 
<!--#include file="inc/headpage.asp"-->
<%
if   rs.eof then
response.Write("<tr><td height=100 align=center><font color=red>对不起！暂无信息</font></td></tr>")
 else
ic=1
%>
<tr>
<%
do while not rs.eof and rowcount > 0

if qtype="com" or qtype="" then

%>
<tr>
<td width="4" height="100" bgcolor="#FCFCFC"  ></td>
<td width="142" height="100" align="center" valign="middle">
<%

  	'--是否使用的名片页------------------------------------------------------------
	   set rsmp=server.CreateObject("adodb.recordset")
	   sqlmp="select * from yixiang_vipgrade where roleid="&rs("gradeid")
	   rsmp.open sqlmp,conn,1,1
	   if not rsmp.eof  then 
   if instr(rsmp("rolelist"),"qw")>0 then	
if is2weburl=1 then
 %>
 <a href="http://<%=rs("user")%>.<%=WebUrl1%>" target="_blank">

 <% 
 hurl="http://"&rs("user")&"."&WebUrl1
 else
%>
 <a  href="<%=HOPE_InstallDir%>vipcom/<%=rs("user")%>" target="_blank">
 <%
  hurl=HOPE_InstallDir&"vipcom/"&rs("user") 
end if
 else
%>
 <a  href="<%=HOPE_InstallDir%>ptcom/<%=rs("user")%>.html" target="_blank">
 <%
  hurl=HOPE_InstallDir&"ptcom/"&rs("user")&".html"
end if
rsmp.close
end if
if trim(rs("cimg")&"ok")="ok" then
%>
<img border="0" src="<%=HOPE_InstallDir%>uploadfile/nopicture.gif"  width="64" height="64" />
<%else%>
<IMG    onmouseover="popImage(this,'<%=HOPE_InstallDir%>vipcom/<%=rs("cimg")%>','<%=hurl%>');"   src="<%=HOPE_InstallDir%>vipcom/<%=rs("cimg")%>"  width="55" height="55"    border=0 >
 <%
end if
%>
</a></td>

<td width="624" height="100" valign="top" style="word-break:break-all" >
<%
'--是否使用的名片页------------------------------------------------------------
	   set rsmp1=server.CreateObject("adodb.recordset")
	   sqlmp1="select * from yixiang_vipgrade where roleid="&rs("gradeid")
	   rsmp1.open sqlmp1,conn,1,1
	   if not rsmp1.eof  then 
   if instr(rsmp1("rolelist"),"qw")>0 then	
if is2weburl=1 then
 %>
 <a href="http://<%=rs("user")%>.<%=WebUrl1%>" target="_blank" style="text-decoration:underline" >
 <%
 else
%>
 <a href="<%=HOPE_InstallDir%>vipcom/<%=rs("user")%>"  target="_blank" style="text-decoration:underline">
 <%
end if
 else
%>
 <a href="<%=HOPE_InstallDir%>ptcom/<%=rs("user")%>.html" target="_blank" style="text-decoration:underline">
 <%
end if
rsmp1.close
end if
 %>
<b><font style="font-size:14px"><%=rs("Qymc")%></font></b></a><br />
<Font color="#999999">(注册时间:<%=rs("idate")%>)</Font>
<font color="#666666">[<%=rs("Country")%>-<%=rs("Sf")%>-<%=rs("City")%>]</font><br />
 <font   color="#4884A8"><%=left(noHtml(rs("Qyjj")),150)%>...</font>
 
</td>
</tr>
<tr><td colspan="3"   height="10" bgcolor="#F9F9F9"	></td></tr>
<%end if

'^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
if qtype="pro" then

%>
<tr>
<td width="4" height="100" bgcolor="#FCFCFC"></td>
<td width="142" height="100" align="center" valign="middle">
 
 <a href="<%=HOPE_InstallDir%>productshow/offerdetail/<%=rs("sortid")%>-<%=rs("typeid")%>-<%=rs("typeid_2")%>-<%=rs("id")%>.html" target="_blank"> 
  <%
  nhurl=HOPE_InstallDir&"productshow/offerdetail/"&rs("sortid")&"-"&rs("typeid")&"-"&rs("typeid_2")&"-"&rs("id")&".html"
 if trim(rs("picture")&"ok")="ok" or rs("picture")="../../UploadFile/nopicture.gif" then
 %>
 <img src="<%=HOPE_InstallDir%>uploadfile/nopicture.gif" width="64" height="64" border="0"  />
 <%
 else
 nnuser=""
 set rsun=server.CreateObject("adodb.recordset")
 sqlun="select [user] from yixiang_corporation where flag=1 and  id="&rs("gsid")
 rsun.open sqlun,conn,1,1
 if not rsun.eof then
 
nnuser=rsun("user") 
 
  rsun.close
  end if
   %>
   
 <IMG    onmouseover="popImage(this,'<%=HOPE_InstallDir%>vipcom/<%=nnuser%>/<%=rs("picture")%>','<%=nhurl%>');"   src="<%=HOPE_InstallDir%>vipcom/<%=nnuser%>/<%=rs("picture")%>"  width="55" height="55"    border=0 >
  <%
 end if
 %></a>
 </td>

<td width="624" height="100" valign="top" style="word-break:break-all">
 
 <a href="<%=HOPE_InstallDir%>productshow/offerdetail/<%=rs("sortid")%>-<%=rs("typeid")%>-<%if trim(rs("typeid_2")&"ok")="ok" then response.Write("0") else response.Write(rs("typeid_2"))  end if%>-<%=rs("id")%>.html" target="_blank" style="text-decoration:underline"><Font style="font-size:14px"><b><%=rs("Cpmc")%></b></Font></a>
 
<br /><font  color="#999999">企业:</font>
<%
'--是否使用的名片页------------------------------------------------------------
	   set rsmp1=server.CreateObject("adodb.recordset")
	   sqlmp1="select * from yixiang_vipgrade where roleid="&rs("gradeid")
	   rsmp1.open sqlmp1,conn,1,1
	   if not rsmp1.eof  then 
   if instr(rsmp1("rolelist"),"qw")>0 then	
if is2weburl=1 then
 %>
 <a href="http://<%=rs("user")%>.<%=WebUrl1%>" target="_blank" style="text-decoration:underline" >
 <%
 else
%>
 <a href="<%=HOPE_InstallDir%>vipcom/<%=rs("user")%>"  target="_blank" style="text-decoration:underline">
 <%
end if
 else
%>
 <a href="<%=HOPE_InstallDir%>ptcom/<%=rs("user")%>.html" target="_blank" style="text-decoration:underline">
 <%
end if
rsmp1.close
end if
 %>
<b><%=rs("Qymc")%></b></a><br />
 <font   color="#4884A8"><%=left(noHtml(rs("Xxsm")),150)%>...</font>
  <a href="<%=HOPE_InstallDir%>productshow/offerdetail/<%=rs("sortid")%>-<%=rs("typeid")%>-<%if trim(rs("typeid_2")&"ok")="ok" then response.Write("0") else response.Write(rs("typeid_2"))  end if%>-<%=rs("id")%>.html" target="_blank">
  <font color="red">详细>></font>
 </a>
</td>
</tr>
<tr><td colspan="3"   height="10" bgcolor="#F9F9F9"	></td></tr>

<%

 end if
 '^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^

if qtype="trade" or qtype="buy"  then

 %><tr><td width="2" height="100" bgcolor="#FCFCFC"></td>
<td width="142" height="100" align="center" valign="middle">
<%
if trim(rs("type")&"ok")="卖ok" then 

%>
 <a href="<%=HOPE_InstallDir%>tradeinfo/offerdetail/<%=rs("sortid")%>-<%=rs("typeid")%>-<%=rs("typeid_2")%>-<%=rs("Info_ID")%>.html" target="_blank"> 
 <%
 ghurl=HOPE_InstallDir&"tradeinfo/offerdetail/"&rs("sortid")&"-"&rs("typeid")&"-"&rs("typeid_2")&"-"&rs("Info_ID")&".html"
 else
  %>
  <a  href="<%=HOPE_InstallDir%>seller/offerdetail/<%=rs("sortid")%>-<%=rs("typeid")%>-<%=rs("typeid_2")%>-<%=rs("Info_ID")%>.html" target="_blank"> 
  <%
  ghurl=HOPE_InstallDir&"seller/offerdetail/"&rs("sortid")&"-"&rs("typeid")&"-"&rs("typeid_2")&"-"&rs("Info_ID")&".html"
 
  end if
  
 if trim(rs("draw")&"ok")="ok" then
 %>
 <img src="<%=HOPE_InstallDir%>uploadfile/nopicture.gif" width="64" height="64" border="0"  />
 <%
 else
 gusern=""
 set rsun=server.CreateObject("adodb.recordset")
 sqlun="select [user] from yixiang_corporation where flag=1 and  id="&rs("gsid")
 rsun.open sqlun,conn,1,1
 if not rsun.eof then
gusern=rsun("user") 
   rsun.close
  end if
  %>
<IMG    onmouseover="popImage(this,'<%=HOPE_InstallDir%>vipcom/<%=gusern%>/<%=rs("draw")%>','<%=ghurl%>');"   src="<%=HOPE_InstallDir%>vipcom/<%=gusern%>/<%=rs("draw")%> "  width="55" height="55"    border=0 >
  <%
 end if
 %></a>
 </td>

<td width="624" height="100" valign="top" style="word-break:break-all">
<%
if trim(rs("type")&"ok")="卖ok" then 

%>
 <a href="<%=HOPE_InstallDir%>tradeinfo/offerdetail/<%=rs("sortid")%>-<%=rs("typeid")%>-<%=rs("typeid_2")%>-<%=rs("Info_ID")%>.html" target="_blank" style="text-decoration:underline"><font style="font-size:14px"><b><%=rs("showname")%></b></font></a>
 <%else%>
  <a href="<%=HOPE_InstallDir%>seller/offerdetail/<%=rs("sortid")%>-<%=rs("typeid")%>-<%=rs("typeid_2")%>-<%=rs("Info_ID")%>.html" target="_blank" style="text-decoration:underline"><font style="font-size:14px"><b><%=rs("showname")%></b></font></a>
  <%end if%>
<br /><font color="#999999">企业:</font>
<%
Set rscm=server.CreateObject("adodb.recordset")
sqlcm="select [user],Qymc,flag,gradeid from yixiang_corporation where flag=1 and  ID="&rs("Gsid")
rscm.open sqlcm,conn,1,1

if   rscm.eof then
response.Write("不详")
else
 
 
 '--是否使用的名片页------------------------------------------------------------
	   set rsmp1=server.CreateObject("adodb.recordset")
	   sqlmp1="select * from yixiang_vipgrade where roleid="&rscm("gradeid")
	   rsmp1.open sqlmp1,conn,1,1
	   if not rsmp1.eof  then 
   if instr(rsmp1("rolelist"),"qw")>0 then	
if is2weburl=1 then
 %>
 <a href="http://<%=rs("user")%>.<%=WebUrl1%>" target="_blank" style="text-decoration:underline" >
 <%
 else
%>
 <a href="<%=HOPE_InstallDir%>vipcom/<%=rscm("user")%>"  target="_blank" style="text-decoration:underline">
 <%
end if
 else
%>
 <a href="<%=HOPE_InstallDir%>ptcom/<%=rscm("user")%>.html" target="_blank" style="text-decoration:underline">
 <%
end if
rsmp1.close
end if
 %>
<%=rscm("Qymc")%></a><br />
 
 <%
 rscm.close
 end if 
 %>
 <font   color="#4884A8"><%=left(noHtml(rs("content")),150)%>...</font>
<%
if trim(rs("type")&"ok")="卖ok" then 
 
%>
 <a href="<%=HOPE_InstallDir%>tradeinfo/offerdetail/<%=rs("sortid")%>-<%=rs("typeid")%>-<%=rs("typeid_2")%>-<%=rs("Info_ID")%>.html" target="_blank">
<%
else

%>
<a  href="<%=HOPE_InstallDir%>seller/offerdetail/<%=rs("sortid")%>-<%=rs("typeid")%>-<%=rs("typeid_2")%>-<%=rs("Info_ID")%>.html" target="_blank">
<%
end if
%>
 <font color="red">详细>></font> </a>
</td>
</tr>
<tr><td colspan="3"   height="10" bgcolor="#F9F9F9"	></td></tr>

 <%
 end if
 
 ic=ic+1
icolor=icolor+1
if icolor>1 then icolor=0
rowcount=rowcount-1
rs.movenext
loop
end if
 
%>
</table>
<table border="0" cellpadding="0" cellspacing="0" align="center" width="<%=HOPE_PageWidth%>" ><tr><td align="center"><%=listPages(""&HOPE_InstallDir&"addrinfo_detail.asp?qtype="&qtype&"&sf="&sf&"&city="&city&"")%></td></tr></table>
 
 <br />
  <!--#include file="inc/end.asp"-->
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>