<table width="100%" border="0" align="center" cellSpacing=1 cellPadding=0>
<%sql="select * from nyeee_type where name ='求租' or name ='出租' or name ='求购' or name ='出售' or name ='转让' or name ='求职' or name ='招聘' or name ='招生' or name ='培训' or name ='家政' or name ='维修' or name ='数码' or name ='网络'" 
set rs=server.createobject("adodb.recordset")               
rs.open sql,conn,1,1
if rs.eof then%><tr bgcolor="#FFFFFF">
                  <p align='center'><font color='#FF0000'>暂无分类</font></p>
                  <%rs.close
set rs=nothing                            
else
while not rs.eof%>
<script language=JavaScript>
function MM_displayStatusMsg(msgStr) { //v1.0
  status=msgStr;
  document.MM_returnValue = true;
}
function statusOut() {
self.status = '';
}
</script>
    <td width="5" align="center" bgcolor="<%=rs("trcolor")%>" onMouseOut=statusOut(); onMouseOver="MM_displayStatusMsg('键连至 <%=rs("name")%>分类');return true;" onclick=window.open("type.asp?name=<%=rs("name")%>","_blank") style="cursor: hand "><font style="font-size:14px" color="<%=rs("titlecolor")%>"><%=rs("name")%></font></td>
				  <td>
				  <table width="100%" border="0" align="center" cellspacing="4">
          <%sql1="select top 6 * from nyeee_data where type ='"&rs("name")&"' and mark='yes' and stop >= date() order by shouye desc,top desc,money desc,adid desc"              
set rs1=server.createobject("adodb.recordset")               
rs1.open sql1,connstr,1,1 
if rs1.eof then                          
%>                         
<tr><td style="BORDER-RIGHT: <%=rs("tdcolor")%> 1px dotted; BORDER-TOP: <%=rs("tdcolor")%> 1px dotted; BORDER-LEFT: <%=rs("tdcolor")%> 1px dotted; BORDER-BOTTOM: <%=rs("tdcolor")%> 1px dotted" align="center" height=47><font color='#FF0000'>本分类中暂无信息！</font></td><tr>
<%
rs1.close
set rs1=nothing                            
else
dim i1
i1=0
while not rs1.eof
  if i1 mod 3=0 then               '一行4个记录，可修改%>
<tr>
  <%end if%> 
                  <td width=173 height=47 align="center" style="BORDER-RIGHT: <%=rs("tdcolor")%> 1px dotted; BORDER-TOP: <%=rs("tdcolor")%> 1px dotted; BORDER-LEFT: <%=rs("tdcolor")%> 1px dotted; BORDER-BOTTOM: <%=rs("tdcolor")%> 1px dotted"><a href="show.asp?id=<%=rs1("adid")%>" target="_blank"><font style="font-size:14px" color="<%=rs("titlecolor")%>"><b><%=left(rs1("title"),10)%></b></font></a><br>
<font color="<%=rs("telcolor")%>"><%=rs1("tel")%></font>
<%i1=i1+1%>
  </td>
<%rs1.movenext
     wend
     rs1.close
	 end if%>
</tr></table></td>
				  </tr>
<%rs.movenext
wend
rs.close
set rs=nothing
end if%>
</table>