<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<% data_path="../" 'ACC连接数据库路径，对SQL无效 %>
<!--#include file="../conn/conn.asp"-->
<!--#include file="../inc/safe.asp"-->
  <!--#include file="../inc/head.asp"-->
  <meta http-equiv="Content-Type" content="text/html; charset=gb2312">
   <!--层--------------------------------start------------------------------------------------>
 
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);

function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_showHideLayers() { //v6.0
  var i,p,v,obj,args=MM_showHideLayers.arguments;
  for (i=0; i<(args.length-2); i+=3) if ((obj=MM_findObj(args[i]))!=null) { v=args[i+2];
    if (obj.style) { obj=obj.style; v=(v=='show')?'visible':(v=='hide')?'hidden':v; }
    obj.visibility=v; }
}

function MM_dragLayer(objName,x,hL,hT,hW,hH,toFront,dropBack,cU,cD,cL,cR,targL,targT,tol,dropJS,et,dragJS) { //v4.01
  //Copyright 1998 Macromedia, Inc. All rights reserved.
  var i,j,aLayer,retVal,curDrag=null,curLeft,curTop,IE=document.all,NS4=document.layers;
  var NS6=(!IE&&document.getElementById), NS=(NS4||NS6); if (!IE && !NS) return false;
  retVal = true; if(IE && event) event.returnValue = true;
  if (MM_dragLayer.arguments.length > 1) {
    curDrag = MM_findObj(objName); if (!curDrag) return false;
    if (!document.allLayers) { document.allLayers = new Array();
      with (document) if (NS4) { for (i=0; i<layers.length; i++) allLayers[i]=layers[i];
        for (i=0; i<allLayers.length; i++) if (allLayers[i].document && allLayers[i].document.layers)
          with (allLayers[i].document) for (j=0; j<layers.length; j++) allLayers[allLayers.length]=layers[j];
      } else {
        if (NS6) { var spns = getElementsByTagName("span"); var all = getElementsByTagName("div"); 
          for (i=0;i<spns.length;i++) if (spns[i].style&&spns[i].style.position) allLayers[allLayers.length]=spns[i];}
        for (i=0;i<all.length;i++) if (all[i].style&&all[i].style.position) allLayers[allLayers.length]=all[i]; 
    } }
    curDrag.MM_dragOk=true; curDrag.MM_targL=targL; curDrag.MM_targT=targT;
    curDrag.MM_tol=Math.pow(tol,2); curDrag.MM_hLeft=hL; curDrag.MM_hTop=hT;
    curDrag.MM_hWidth=hW; curDrag.MM_hHeight=hH; curDrag.MM_toFront=toFront;
    curDrag.MM_dropBack=dropBack; curDrag.MM_dropJS=dropJS;
    curDrag.MM_everyTime=et; curDrag.MM_dragJS=dragJS;
    curDrag.MM_oldZ = (NS4)?curDrag.zIndex:curDrag.style.zIndex;
    curLeft= (NS4)?curDrag.left:(NS6)?parseInt(curDrag.style.left):curDrag.style.pixelLeft; 
    if (String(curLeft)=="NaN") curLeft=0; curDrag.MM_startL = curLeft;
    curTop = (NS4)?curDrag.top:(NS6)?parseInt(curDrag.style.top):curDrag.style.pixelTop; 
    if (String(curTop)=="NaN") curTop=0; curDrag.MM_startT = curTop;
    curDrag.MM_bL=(cL<0)?null:curLeft-cL; curDrag.MM_bT=(cU<0)?null:curTop-cU;
    curDrag.MM_bR=(cR<0)?null:curLeft+cR; curDrag.MM_bB=(cD<0)?null:curTop+cD;
    curDrag.MM_LEFTRIGHT=0; curDrag.MM_UPDOWN=0; curDrag.MM_SNAPPED=false; //use in your JS!
    document.onmousedown = MM_dragLayer; document.onmouseup = MM_dragLayer;
    if (NS) document.captureEvents(Event.MOUSEDOWN|Event.MOUSEUP);
  } else {
    var theEvent = ((NS)?objName.type:event.type);
    if (theEvent == 'mousedown') {
      var mouseX = (NS)?objName.pageX : event.clientX + document.body.scrollLeft;
      var mouseY = (NS)?objName.pageY : event.clientY + document.body.scrollTop;
      var maxDragZ=null; document.MM_maxZ = 0;
      for (i=0; i<document.allLayers.length; i++) { aLayer = document.allLayers[i];
        var aLayerZ = (NS4)?aLayer.zIndex:parseInt(aLayer.style.zIndex);
        if (aLayerZ > document.MM_maxZ) document.MM_maxZ = aLayerZ;
        var isVisible = (((NS4)?aLayer.visibility:aLayer.style.visibility).indexOf('hid') == -1);
        if (aLayer.MM_dragOk != null && isVisible) with (aLayer) {
          var parentL=0; var parentT=0;
          if (NS6) { parentLayer = aLayer.parentNode;
            while (parentLayer != null && parentLayer.style.position) {             
              parentL += parseInt(parentLayer.offsetLeft); parentT += parseInt(parentLayer.offsetTop);
              parentLayer = parentLayer.parentNode;
          } } else if (IE) { parentLayer = aLayer.parentElement;       
            while (parentLayer != null && parentLayer.style.position) {
              parentL += parentLayer.offsetLeft; parentT += parentLayer.offsetTop;
              parentLayer = parentLayer.parentElement; } }
          var tmpX=mouseX-(((NS4)?pageX:((NS6)?parseInt(style.left):style.pixelLeft)+parentL)+MM_hLeft);
          var tmpY=mouseY-(((NS4)?pageY:((NS6)?parseInt(style.top):style.pixelTop) +parentT)+MM_hTop);
          if (String(tmpX)=="NaN") tmpX=0; if (String(tmpY)=="NaN") tmpY=0;
          var tmpW = MM_hWidth;  if (tmpW <= 0) tmpW += ((NS4)?clip.width :offsetWidth);
          var tmpH = MM_hHeight; if (tmpH <= 0) tmpH += ((NS4)?clip.height:offsetHeight);
          if ((0 <= tmpX && tmpX < tmpW && 0 <= tmpY && tmpY < tmpH) && (maxDragZ == null
              || maxDragZ <= aLayerZ)) { curDrag = aLayer; maxDragZ = aLayerZ; } } }
      if (curDrag) {
        document.onmousemove = MM_dragLayer; if (NS4) document.captureEvents(Event.MOUSEMOVE);
        curLeft = (NS4)?curDrag.left:(NS6)?parseInt(curDrag.style.left):curDrag.style.pixelLeft;
        curTop = (NS4)?curDrag.top:(NS6)?parseInt(curDrag.style.top):curDrag.style.pixelTop;
        if (String(curLeft)=="NaN") curLeft=0; if (String(curTop)=="NaN") curTop=0;
        MM_oldX = mouseX - curLeft; MM_oldY = mouseY - curTop;
        document.MM_curDrag = curDrag;  curDrag.MM_SNAPPED=false;
        if(curDrag.MM_toFront) {
          eval('curDrag.'+((NS4)?'':'style.')+'zIndex=document.MM_maxZ+1');
          if (!curDrag.MM_dropBack) document.MM_maxZ++; }
        retVal = false; if(!NS4&&!NS6) event.returnValue = false;
    } } else if (theEvent == 'mousemove') {
      if (document.MM_curDrag) with (document.MM_curDrag) {
        var mouseX = (NS)?objName.pageX : event.clientX + document.body.scrollLeft;
        var mouseY = (NS)?objName.pageY : event.clientY + document.body.scrollTop;
        newLeft = mouseX-MM_oldX; newTop  = mouseY-MM_oldY;
        if (MM_bL!=null) newLeft = Math.max(newLeft,MM_bL);
        if (MM_bR!=null) newLeft = Math.min(newLeft,MM_bR);
        if (MM_bT!=null) newTop  = Math.max(newTop ,MM_bT);
        if (MM_bB!=null) newTop  = Math.min(newTop ,MM_bB);
        MM_LEFTRIGHT = newLeft-MM_startL; MM_UPDOWN = newTop-MM_startT;
        if (NS4) {left = newLeft; top = newTop;}
        else if (NS6){style.left = newLeft; style.top = newTop;}
        else {style.pixelLeft = newLeft; style.pixelTop = newTop;}
        if (MM_dragJS) eval(MM_dragJS);
        retVal = false; if(!NS) event.returnValue = false;
    } } else if (theEvent == 'mouseup') {
      document.onmousemove = null;
      if (NS) document.releaseEvents(Event.MOUSEMOVE);
      if (NS) document.captureEvents(Event.MOUSEDOWN); //for mac NS
      if (document.MM_curDrag) with (document.MM_curDrag) {
        if (typeof MM_targL =='number' && typeof MM_targT == 'number' &&
            (Math.pow(MM_targL-((NS4)?left:(NS6)?parseInt(style.left):style.pixelLeft),2)+
             Math.pow(MM_targT-((NS4)?top:(NS6)?parseInt(style.top):style.pixelTop),2))<=MM_tol) {
          if (NS4) {left = MM_targL; top = MM_targT;}
          else if (NS6) {style.left = MM_targL; style.top = MM_targT;}
          else {style.pixelLeft = MM_targL; style.pixelTop = MM_targT;}
          MM_SNAPPED = true; MM_LEFTRIGHT = MM_startL-MM_targL; MM_UPDOWN = MM_startT-MM_targT; }
        if (MM_everyTime || MM_SNAPPED) eval(MM_dropJS);
        if(MM_dropBack) {if (NS4) zIndex = MM_oldZ; else style.zIndex = MM_oldZ;}
        retVal = false; if(!NS) event.returnValue = false; }
      document.MM_curDrag = null;
    }
    if (NS) document.routeEvent(objName);
  } return retVal;
}

function loadwin(obj){
	with(MM_findObj(obj))with(style){
		filters[0].apply();
		display='';
		filters[0].play();
	}
}
function cs(captionBG,bodyBG,tableBG){
oldBody=document.body;
	with(oldBody){
		var newBody=cloneNode();
		style.filter='blendtrans(duration=1)';
		filters[0].apply();
		with(document.styleSheets[0]){
			with(rules[0].style){backgroundColor=captionBG;}
			with(rules[1].style){backgroundColor=bodyBG;}
			with(rules[2].style){backgroundColor=tableBG}
		}
		filters[0].play();
		setTimeout(function(){
				if(oldBody!=null){
					oldBody.applyElement(newBody, "inside")
					oldBody.swapNode(newBody);
					oldBody.removeNode(true);
					}
				},1500);
	}
}
//-->
</script>
<style type="text/css">
<!--
.caption {
 
 
	background-color: #00CCFF;
	padding-left: 5px;
	cursor: default;
	font-family: "Verdana", "Arial";
	border: 1px inset;
}
body {
 
	border: 1px inset;
	 
}
table {
	 
}
td {
  
}
.win {
--	filter:BlendTrans(duration=1) DropShadow(Color=#cccccc, OffX=3, OffY=3) alpha(opacity=90)
}
a {
	text-decoration: none;
	color: #003399;
}
a:hover {
	color: #FF0000;
}
input {
  
	border-width: 1px;
}
.statusbar {
 	padding-left: 3px;
}
.button {
 
	text-align: center;
}
.navframe {
	padding: 5px;
}
-->
</style>
 <style type="text/css">
<!--
.searchbar1 {BORDER-TOP: #f1f1f1 3px solid;  FONT-WEIGHT: bold; BACKGROUND: #e7e7e7; BORDER-BOTTOM: #bebebe 3px solid; FONT-FAMILY: 宋体; padding-top:3px}
.companybar1 {background:url("../seller/images/search_bg.gif");border:#999999 solid;border-width:1 1 0 1;height:29px;border-bottom:#666666 3 solid;text-align:center;font:bold 14px;padding-top:4px;}
.orangeborder {border:#CC3300 2 solid;padding-left: 15px}
.cate {padding-left: 14px;font-size:12px;LINE-HEIGHT: 150%;}
.smalltoppad3 {padding-top:3px}
.orangeborder2 {border:#cc3300 1 solid;padding-left: 15px}
a:link {
	color: #333333;
	text-decoration: none;
}
a:visited {
	text-decoration: none;
	color: #333333;
}
a:hover {
	text-decoration: underline;
	color: #FF6600;
}
a:active {
	text-decoration: none;
}

-->
</style>
<style type="text/css">
<!--
.tdc1{
 
	filter:	progid:DXImageTransform.Microsoft.Gradient(GradientType=0, StartColorStr=#FFFFFF, EndColorStr=#BECCE7);
}
.tdc{
 
	filter:	progid:DXImageTransform.Microsoft.Gradient(GradientType=1, StartColorStr=#FFFFFF, EndColorStr=#EEEEEE);
}
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
}
 
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
}
.STYLE1 {color: #FFFFFF}
-->
</style>
<title><%=webname%>模糊搜索</title>
 <table width="<%=HOPE_PageWidth%>" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#F0F2F4" bgcolor="#EEEEEE">
                <tr><td height="30" colspan="2" align="left">&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%" class="tdc"> 
                  <% 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%>"  border="1" align="center" cellpadding="0"  cellspacing="0" bordercolor="#F7F7F7">
 <tr> 
 <td width="<%=HOPE_PageWidth%>" valign="top">
    <!--------右边---->
   <%
   sql= "select * from Yixiang_corporation where  flag=1"
 '-查询公司信息------------------------------------------------------------------------------
 if replace_text(request("searchtype"))="com" then 
 addrname=replace_text(request("addr"))
 cityname=replace_text(request("city"))
 cityname=replace(cityname,"省","")
 if addrname<>"" then 
  sql=sql&" and   country  like '%"&addrname&"%' or sf  like '%"&addrname&"%'  or city  like '%"&addrname&"%'"
 end if
 if cityname<>"" then
   sql= "select * from Yixiang_corporation where  flag=1 and   (country  like '%"&addrname&"%' or sf  like '%"&addrname&"%'  or city  like '%"&addrname&"%') and (country  like '%"&cityname&"%' or sf  like '%"&cityname&"%'  or city  like '%"&cityname&"%')"
  end if
 end if
 '-查询公司信息-end -----------------------------------------------------------------------------
  
 
  sql=sql&"  order by trust_score desc "
    
Set rs= Server.CreateObject("ADODB.Recordset") 
rs.open sql,conn,1,1 

msg_per_page=20 '定义每页显示记录条数
%>
  
<!--#include file="../inc/headpage.asp"-->
 	 <table  cellspacing="0"  cellpadding="0" width="100%" align="center" border="0">
     <tr>
      <td width="100%" height="20" valign="top" bgcolor="#ffffff">
         <table width="100%" height="21" border="0" align="center" cellpadding="0" cellspacing="0">
             <tr bgcolor="#94ABD6">
              <td width="6%" height="30" align="center" class="S"> <span class="STYLE1">指数</span> </td>
              <td width="48%" height="30" align="center" class="S"><span class="STYLE1">公司/主营产品、服务</span></td>
              <td width="10%" height="30" align="center" class="S"><span class="STYLE1">成立日期</span></td>
              <td width="10%" height="30" align="center" class="S"><span class="STYLE1">员工人数</span></td>
              <td width="12%" height="30" align="center" class="S"><span class="STYLE1">注册资本(元)</span></td>
              <td width="12%" height="30" align="center" class="S"><span class="STYLE1">年营业额(元)</span></td>
            </tr>
			<tr><td colspan="6" height="2"    bgcolor="#6889C6"></td>
			</tr>
  <%
   if rs.eof then

%>
<tr><td height="100" colspan="6" align="center"    bgcolor="#FFFFFF"><font color="#E0814E">对不起！暂无任何关于&nbsp;<b><font color="red">
<%=addrname%><%=moshi%><%if cityname<>"" then response.Write("--"&cityname&"省") end if%></font></b>&nbsp;的公司信息</font></td>
</tr>
<%
 else
 
do while not rs.eof and rowcount > 0
%>
  <TR 
 <%
if icolor=0 then 
response.write" bgColor=#ffffff" 
else 
response.write" bgColor=#f6f6f6" 
end if
%>> 
 <TD align=middle width='6%'>
 <b><font color=red><%=rs("trust_score")%></FONT></b> 
 </TD> 
 <TD width="48%" align="left""" class=cate style=""40%WORD-BREAK: break-all""> 
<%
'--是否使用的名片页------------------------------------------------------------
	   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
response.write"<A href=http://"&rs("user")&"."&weburl1&" target=_blank   style='text-decoration:underline'><font style='font-size:14px'><STRONG>"&rs("qymc")&"</STRONG></font></A>"&vbCrlf 
else
response.write"<A href="""&HOPE_InstallDir&"vipcom/"&rs("user")&""" target=_blank style='text-decoration:underline'><font style='font-size:14px'><STRONG>"&rs("qymc")&"</STRONG></font></A>"&vbCrlf 
end if
 else
response.write"<A href="""&HOPE_InstallDir&"Ptcom/"&rs("user")&".html"" target=""_blank""style='text-decoration:underline'><font style='font-size:14px'><STRONG>"&rs("qymc")&"</STRONG></font></A>"&vbCrlf
end if
 rsmp.close
end if
response.write"<BR><font color=""#666666"">"
 response.write""&rs("country")&""
 response.write"-"&rs("sf")&"-"&rs("city")&""
 response.write"</FONT><FONT color=#666666> "
c="select * from Yixiang_cor_format where id="&rs("p_z_Z_LegalStatus")&""
set rsc=server.CreateObject("adodb.recordset")
rsc.open c,conn,1,1 
if not rsc.eof then response.write"（"&rsc("title")&"）"
rsc.close
set rsc=nothing

'--是否使用的名片页------------------------------------------------------------
	   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
 response.write" <br><a href=http://"&rs("user")&"."&weburl1&"  target=""_blank""><FONT color=#666666>查看该会员企业网站</font></a>"
else
response.write" <br><a href="""&HOPE_InstallDir&"vipcom/"&rs("user")&""" target=""_blank""><FONT color=#666666>查看该会员企业网站</font></a>"
 end if
  end if
  rsmp1.close
  end if
  
response.write"</FONT><BR>"&vbCrlf
 response.write" <font class=s color=666666>主营:"&rs("zycp")&"</FONT> <BR>"&vbCrlf
 
 
response.write" <font color=""#666666"" class=s>"&left(rs("qyjj"),100)&"...</font> </TD>"&vbCrlf
 if trim("ok"&rs("p_z_Z_EstablishedYear"))="ok" then
%>
<TD width="10%"10%"" class=cate  align=center>未提供</TD> 
<%
else
%>
<TD width="10%"10%"" class=cate style=""WORD-BREAK: break-all"" align=center><%=rs("p_z_Z_EstablishedYear")%></TD> 
<%
end if
%>
 <TD width="12%"10%"" class=S align=center> 
 <%
c2="select * from Yixiang_cor_total where id="&rs("p_z_Z_EmployeesCount")&""
set rsc2=server.CreateObject("adodb.recordset")
rsc2.open c2,conn,1,1
if rsc2.eof then
response.write"未提供"
else
response.write""&rsc2("title")&""
end if
rsc2.close
set rsc2=nothing
%>
</TD> 
 <TD width="12%"10%""class=S align=center>
 <%
c3="select * from Yixiang_cor_bank where id="&rs("p_z_Z_RegCapital")&""
set rsc3=server.CreateObject("adodb.recordset") 
rsc3.open c3,conn,1,1
if rsc3.eof then
response.write"未提供"
else
response.write""&rsc3("title")&""
end if
rsc3.close
set rsc3=nothing 
%>
</TD> <TD width="2%"10%""class=S align=center>
<%
c4="select * from Yixiang_cor_bank where id="&rs("p_z_Z_AnnualRevenue")&""
set rsc4=server.CreateObject("adodb.recordset")
rsc4.open c4,conn,1,1
if rsc4.eof then
response.write"未提供"
else
response.write""&rsc4("title")&""
end if
rsc4.close
set rsc4=nothing 
%>
</TD> 
  </TR> 
<%
icolor=icolor+1
if icolor>1 then icolor=0
rowcount=rowcount-1
rs.movenext
loop

end if

%>  


              <tr>
              <td  colspan="6"  align="center">   <br /><%=listPages(""&HOPE_InstallDir&"search/searchnearmore.asp?searchtype="&replace_text(request("searchtype"))&"&addr="&replace_text(request("addr"))&"&mo="&replace_text(request("mo")))%>
</td>
   </tr>
   <%
	   rs.close
set rs=nothing
%>  
         </table></td>
    </tr>
 </table>
  
  </td>
 </tr>
 </table>
    <!---------右边---end -->

  </td>
 </tr></table>
 
   <!---层效果 start --->

<div id="mycolor" style="position:absolute; left:5px; top:0px; width:200px; z-index:1;display:none;" class="win" onMouseDown="MM_dragLayer('mycolor','',0,0,150,18,true,false,-1,-1,-1,-1,15,320,100,'',false,'')">
		<table width="100%" border="1"  bordercolor="#CDD8EB" cellpadding="0"  bgcolor="#F8FAFC" cellspacing="0">
		 	<tr><td>
			<table width="99%"   border="0" bordercolor="#CDD8EB" cellpadding="0" bgcolor="#CCCCCC" cellspacing="0">
 				<tr bgcolor="#92AEE2"><td   height="25"   >&nbsp; <font color="#FFFFFF"><b>快速查询公司库</b></font></td>
						<td    bgcolor="#F5F5F5" align="center"><a href="#" onClick="with(MM_findObj('mycolorwin').style)display=display=='none'?'':'none'"><font color="#FF0000">—</font></a></td>
						<td   bgcolor="#F5F5F5" align="center"><a href="#" onClick="MM_showHideLayers('mycolor','','hide')"><font  color="#FF0000">×</font></a></td>
			  </tr>
			  
			   <tr><td height="2"  colspan="3"  bgcolor="#8DA9D1"></td></tr></table>
				</td></tr>
  <tr id="mycolorwin"><td>
 	 <table  border="0" cellpadding="0"  cellspacing="0" width="200" align="center">
  <tr>
   <td     bgcolor="#FFFFFF" height="25"><font  color="#E98C30">◆</font>&nbsp;<font color="#637A8F"><b>按地区查询</b></font> </td>
 </tr>
 <tr><td  bgcolor="#AABEDD" height="2" ></td></tr>
 </table>
   <!---------区域地址---->
 <table  bgcolor="#FFFFFF"   border="0" cellpadding="0"  bordercolor="#EBEBEB" cellspacing="0" width="98%" align="center">
  <tr>
  <%
  set rsq=server.CreateObject("adodb.recordset")
  sqlq="select  * from yixiang_area order by orderid "
  rsq.open sqlq,conn,1,1
  if not rsq.eof then 
  i=1
  do while not rsq.eof
  %> 
    <td height="20"  align="center"><a href="<%=HOPE_InstallDir%>search/searchnearmore.asp?searchtype=com&cityof=<%=rsq("id")%>&addr=<%=rsq("Province")%>"><font color="#3E6791"><%=rsq("Province")%></font></a>
  </td>
  <%
  if i mod 4=0 then
  response.Write("</tr><tr>")
  end if
   i=i+1
  rsq.movenext
  loop
  rsq.close
  end if
  %>

  </tr>
  </table><br />
  <%
  if replace_text(request("cityof"))<>""    then 
  cityno=replace_text(request("cityof"))
  addrc=replace_text(request("addr"))
  if not isnumeric(cityno) then 
  cityno=0
  end if
  %>
  <table  bgcolor="#FFFFFF"   border="0" cellpadding="0"  bordercolor="#EBEBEB" cellspacing="0" width="98%" align="center">
 
 <tr><td  align="center"><font color="red"><b><%=addrc%></b></font></td><td bgcolor="#AABEDD" colspan="3"></tr>
  <tr><td height="1" colspan="4" bgcolor="#AABEDD"></td></tr>

  <tr>
  <%
  set rsq1=server.CreateObject("adodb.recordset")
  sqlq1="select  * from yixiang_areacity  where cityof="&cityno&" "
  rsq1.open sqlq1,conn,1,1
  if not rsq1.eof then 
  i=1
  do while not rsq1.eof
  %> 
    <td height="20"  align="center"><a href="<%=HOPE_InstallDir%>search/searchnearmore.asp?addr=<%=addrc%>&cityof=<%=cityno%>&searchtype=com&city=<%=rsq1("city")%>"><font color="#3E6791"><%=rsq1("city")%></font></a>
  </td>
  <%
  if i mod 4=0 then
  response.Write("</tr><tr>")
  end if
   i=i+1
  rsq1.movenext
  loop
  rsq1.close
  end if
  %>

  </tr>
  </table>
  <%
  end if
  %>
  </td>
    </tr>
  </tbody>
</table>
   </td>
		  </tr>
  </table>
 		
</div>
<script>setTimeout("loadwin('mycolor')",1000)</script>

<!---层效果 end ---> 
 <!--#include file="../inc/end.asp"-->
<%

conn.close
set conn=nothing
%>