<!--#include file="Conn.asp"-->
<!--#include file="sd_myfunction.asp"-->
<!--#include file="sd_site.asp"-->
<%
order=request("order")
quyu=request("quyu")
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta http-equiv="X-UA-Compatible" content="IE=7" />
<title>各区域主机提供商，<%=sd_hostname%> 虚拟主机评测 IDC导航 IDC评测 583344.com</title>
<meta name="keywords" content="<%=sd_keywords%>">
<meta name="description" content="<%=sd_description%>">
<LINK href="sd_style.css" type=text/css rel=stylesheet>
<META content="MSHTML 6.00.2800.1613" name=GENERATOR>
</head>
<BODY>
<div id="container" class="wrapper">
<!--#include file="sd_top.asp"-->
<SCRIPT>function goUrl(url){window.location.href=url;}</SCRIPT>
  <div id="main">
    <div class="left2">
      <div class="sidebar2">
        <div class="title">
          <h3><a href="index.asp" title="<%=sd_hostname%>"><%=sd_hostname%></a> > 各区域主机提供商</h3>
          <span>排序：<select name="orderselect" onChange="goUrl(this.options[this.selectedIndex].value)">
            <option value="sd_quyu.asp?quyu=<%=quyu%>&order=0" <%if order=0 then Response.Write "selected" %> >默认排序</option>
            <option value="sd_quyu.asp?quyu=<%=quyu%>&order=1" <%if order=1 then Response.Write "selected" %> >推荐指数</option>
            <option value="sd_quyu.asp?quyu=<%=quyu%>&order=2" <%if order=2 then Response.Write "selected" %> >评价次数</option>
            <option value="sd_quyu.asp?quyu=<%=quyu%>&order=3" <%if order=3 then Response.Write "selected" %> >评价得分</option>
            <option value="sd_quyu.asp?quyu=<%=quyu%>&order=4" <%if order=4 then Response.Write "selected" %> >速度最快</option>
          </select>
          </span>
          <span>所在省份：<select name="diqu" onChange="goUrl(this.options[this.selectedIndex].value)">
            <option value="">请选择</option>
<%
set rs=server.createobject("adodb.recordset")
rs.open "select id,sd_title from sd_yys order by sd_topid desc",conn,1,3
while not rs.eof
response.write "<option value='sd_fox.asp?fox="&rs("id")&"' >"&rs("sd_title")&"</option>"&vbCrLf
call listunder(1)
rs.movenext
wend
%>
          </select>
          </span>
           </div>
        <div class="content">
          <div id="type"><span class="w_lx">类型</span><span class="w_sj">商家</span><span class="w_cs">&nbsp;</span><span class="w_zpf">总评分</span><span class="w_szd">所在地</span><span class="w_pls">评论/人气</span></div>
          <div id="idclist">
<%
if order="1" then
sql="select * from sd_show where sd_classid in("&quyu&") and sd_shenhe=1 order by sd_tj_px desc,id desc"
elseif order="2" then
sql="select * from sd_show where sd_classid in("&quyu&") and sd_shenhe=1 order by sd_pinglun desc,id desc"
elseif order="3" then
sql="select * from sd_show where sd_classid in("&quyu&") and sd_shenhe=1 order by sd_jifen desc,id desc"
elseif order="4" then
sql="select * from sd_show where sd_classid in("&quyu&") and sd_shenhe=1 order by sd_sd desc,id desc"
elseif order="0" then
sql="select * from sd_show where sd_classid in("&quyu&") and sd_shenhe=1 order by sd_cn_rz desc, sd_tj_px desc,sd_zp desc,id desc"
else
sql="select * from sd_show where sd_classid in("&quyu&") and sd_shenhe=1 order by sd_cn_rz desc, sd_tj_px desc,sd_zp desc,id desc"
end if

set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
if rs.EOF and rs.BOF then
response.write ("<UL><LI style='PADDING-RIGHT: 20px; PADDING-LEFT: 20px; FONT-SIZE: 16px; PADDING-BOTTOM: 20px; PADDING-TOP: 20px'><P>没有您要查找的IDC公司<STRONG></STRONG>？<A style='COLOR: #ff0000' href='sd_add.asp' target=_blank>点击这里添加</A></P><P style='FONT-SIZE: 12px; PADDING-TOP: 15px'><A href='index.asp'>请尝试换个条件搜索看看，<SPAN style='COLOR: #0099cc'>点此返回首页</SPAN>！</A></P></LI></UL>")
else

myPagesize=15
myPages rs,myPagesize

line=myPagesize
i=0                                  
do while not rs.eof and line>0
i=i+1
%>
            <ul>
              <li class="w_lx"><a href="sd_about.asp?id=3#idc_level" title="等级解释" target="_blank"><%if rs("sd_cn_rz")=3 then%><img src="images/level_yellow.gif" border="0" title="金钻IDC认证"><%end if%><%if rs("sd_cn_rz")=2 then%><img src="images/level_blue.gif" border="0" title="蓝钻IDC认证"><%end if%><%if rs("sd_cn_rz")=1 then%><img src="images/level_grey.gif" border="0" title="灰钻IDC认证"><%end if%><%if rs("sd_cn_rz")=0 then%><img src="images/level_normal.gif" border="0" title="普通IDC"><%end if%></a></li>
              <li class="w_sj"><h4><a href="<%if JT=1 then%>sd_<%=rs("id")%>.htm<%else%>sd_show.asp?id=<%=rs("id")%><%end if%>" target="_blank" title="<%=rs("sd_name")%>"><%=rs("sd_name")%></FONT></a></h4><br><div class="info">
速度<% if rs("sd_sd")<>0 then
sd1=formatnumber((rs("sd_sd")),0)
call sd(sd1)
else
response.write "<font color=#1941A5><strong>未评</strong></font>"
end if %>，性价比<% if rs("sd_xj")<>0 then
xj1=formatnumber((rs("sd_xj")),0)
call xj(xj1)
else
response.write "<font color=#1941A5><strong>未评</strong></font>"
end if %>，服务<% if rs("sd_fw")<>0 then
fw1=formatnumber((rs("sd_fw")),0)
call fw(fw1)
else
response.write "<font color=#1941A5><strong>未评</strong></font>"
end if %>，安全性<% if rs("sd_aq")<>0 then
aq1=formatnumber((rs("sd_aq")),0)
call aq(aq1)
else
response.write "<font color=#1941A5><strong>未评</strong></font>"
end if %>，推荐指数<span class="s4"><%=rs("sd_zp")*20%>%</span></div></li>
              <li class="w_cs">&nbsp;</li>
              <li class="w_zpf"><div id="scorepic<%=left(rs("sd_zp"),1)%>" title="<%=left(rs("sd_zp"),1)%>星">&nbsp;</div></li>
              <li class="w_szd">
<%
set rre=server.createobject("adodb.recordset")
rre.open "select * from sd_yys where id="&rs("sd_classid"),conn,1,3
response.write ""&rre("sd_title")&""
set rre=nothing
%><%=rs("sd_dishi")%></li>
              <li class="w_pls"><%=rs("sd_pinglun")%>/<%=rs("sd_hits")%></li>
              <li class="wypj">
<%set rs1=server.createobject("adodb.recordset")
sql1="select * from sd_pinglun where sd_show_id="&rs("id")&" order by id desc"
rs1.open sql1,conn,1,1
if rs1.eof then
sd_content="请对该供货商的产品及服务质量发表您的看法,方便其他网友选择优秀的网店货源"
sd_name="本站网友"
else
sd_content=left(rs1("sd_content"),35)
sd_name=rs1("sd_name")
end if
rs1=close
set rs1=nothing
%>
<strong><%=sd_name%>：</strong><A href="<%if JT=1 then%>sd_<%=rs("id")%>.htm<%else%>sd_show.asp?id=<%=rs("id")%><%end if%>" title="<%=sd_content%>"><%=sd_content%></A></li>
</ul>
<%rs.movenext
line=line-1
loop
end if%>
	                </div>
          <div class="clear"></div>         
	<div class="pagehead"><%listpages("&quyu="&quyu&"&order="&order&"")%>&nbsp;&nbsp;</div>
          <div class="clear"></div>          
        </div>
        <div class="bottom"></div>
      </div>
    </div>
    <div class="right2">
      <div class="sidebar1">
        <div class="title"><span style="width:197px;"><h3>本类推荐10佳IDC</h3></span></div>
        <div class="content">
          <div class="toplist"><ol>
<%set rs=server.createobject("adodb.recordset")
sql="select * from sd_show where sd_classid in("&quyu&") and sd_shenhe=1 and sd_tj_px<>0 order by sd_tj_px desc"
rs.open sql,conn,1,1
if not rs.eof then
i=0 
do while not rs.eof
i=i+1 %>
            <li><a href="<%if JT=1 then%>sd_<%=rs("id")%>.htm<%else%>sd_show.asp?id=<%=rs("id")%><%end if%>" target="_blank"><%=rs("sd_name")%></A></li>
<%rs.movenext
if i>9 then exit do
loop
end if
rs.close
set rs=nothing%>
          </ol></div>
        </div>
        <div class="bottom"><span style="width:210px;"></span></div>
      </div>
      <div class="sidebar1">
        <div class="title"><span style="width:197px;"><h3>用户评价10佳IDC</h3></span></div>
        <div class="content">
          <div class="toplist"><ol>
<%set rs=server.createobject("adodb.recordset")
sql="select * from sd_show where sd_classid in("&quyu&") and sd_shenhe=1 order by sd_zp desc,id"
rs.open sql,conn,1,1
if not rs.eof then
i=0 
do while not rs.eof
i=i+1 %>
            <li><a href="<%if JT=1 then%>sd_<%=rs("id")%>.htm<%else%>sd_show.asp?id=<%=rs("id")%><%end if%>" target="_blank"><%=rs("sd_name")%></A></li>
<%rs.movenext
if i>9 then exit do
loop
end if
rs.close
set rs=nothing%>
          </ol></div>
        </div>
        <div class="bottom"><span style="width:210px;"></span></div>
      </div>
      <div class="sidebar1">
        <div class="title"><span style="width:197px;"><h3>本类速度10佳IDC</h3></span></div>
        <div class="content">
          <div class="toplist"><ol>
<%set rs=server.createobject("adodb.recordset")
sql="select * from sd_show where sd_classid in("&quyu&") and sd_shenhe=1 order by sd_sd desc,id"
rs.open sql,conn,1,1
if not rs.eof then
i=0 
do while not rs.eof
i=i+1 %>
            <li><a href="<%if JT=1 then%>sd_<%=rs("id")%>.htm<%else%>sd_show.asp?id=<%=rs("id")%><%end if%>" target="_blank"><%=rs("sd_name")%></A></li>
<%rs.movenext
if i>9 then exit do
loop
end if
rs.close
set rs=nothing%>
          </ol></div>
        </div>
        <div class="bottom"><span style="width:210px;"></span></div>
      </div>
      <div class="sidebar1">
        <div class="title"><span style="width:197px;"><h3>本类服务10佳IDC</h3></span></div>
        <div class="content">
          <div class="toplist"><ol>
<%set rs=server.createobject("adodb.recordset")
sql="select * from sd_show where sd_classid in("&quyu&") and sd_shenhe=1 order by sd_fw desc,id"
rs.open sql,conn,1,1
if not rs.eof then
i=0 
do while not rs.eof
i=i+1 %>
            <li><a href="<%if JT=1 then%>sd_<%=rs("id")%>.htm<%else%>sd_show.asp?id=<%=rs("id")%><%end if%>" target="_blank"><%=rs("sd_name")%></A></li>
<%rs.movenext
if i>9 then exit do
loop
end if
rs.close
set rs=nothing%>
          </ol></div>
        </div>
        <div class="bottom"><span style="width:210px;"></span></div>
      </div>
      <div class="sidebar1">
        <div class="title"><span style="width:197px;"><h3>最新加入IDC</h3></span></div>
        <div class="content">
          <div class="toplist"><ol>
<%set rs=server.createobject("adodb.recordset")
sql="select * from sd_show where sd_classid in("&quyu&") and sd_shenhe=1 order by id desc"
rs.open sql,conn,1,1
if not rs.eof then
i=0 
do while not rs.eof
i=i+1 %>
            <li><a href="<%if JT=1 then%>sd_<%=rs("id")%>.htm<%else%>sd_show.asp?id=<%=rs("id")%><%end if%>" target="_blank"><%=rs("sd_name")%></A></li>
<%rs.movenext
if i>9 then exit do
loop
end if
rs.close
set rs=nothing%>
          </ol></div>
        </div>
        <div class="bottom"><span style="width:210px;"></span></div>
      </div>
    </div>
    <div class="clear"></div>
  </div>
<!--#include file="sd_bottom.asp"-->
</div>
</BODY></HTML>
