<%set rs=server.CreateObject("adodb.recordset")
rs.open "select Top 10 * from shjia where tj=5 and flag=2 order by lx desc",conn,1,1
%>
 <table width="98%" border="0" cellspacing="0" cellpadding="0" align="center"> 
<tr> <td><table width="100%" border="0" ALIGN="CENTER" cellpadding="0" cellspacing="0"> 
  <%
do while not rs.eof
%>
  <tr>  
    <td height="22" bgcolor="#FFFFFF">&nbsp;<font color=red> бя</font>
      <%if rs.eof then%>
      <%else%>
      <%response.write "<a href=user/index.asp?id="&rs("shjiaid")&" target=_blank>"
				if len(trim(rs("name")))>15 then
				response.write left(trim(rs("name")),15)&".."
				else
				response.write trim(rs("name"))
				end if
				response.write "</a>"
				%><tr> 
                                    <td width="100%" height="0" background="imagess/please_dot_1.gif"></td>
                                  </tr></td></tr> 
      <%rs.movenext%>
      <%end if%>
    </td>
  </tr>
  <%loop
rs.close
set rs=nothing%>
</table></td></tr></table>




















