<%set rs=server.CreateObject("adodb.recordset")
rs.open "select Top 12 * from shjia where flag=2 order by adddate desc",conn,1,1
%> 
<table width="100%" border="0" align="center" cellspacing="3">
  <%do while not rs.eof%>
  <tr> 
    <td height="22">&nbsp;<img src="images/ring01.gif"> 
      <%response.write "<a href=user/index.asp?id="&rs("shjiaid")&" target=_blank>" 
				if len(trim(rs("name")))>9 then
				response.write left(trim(rs("name")),9)
				else
				response.write trim(rs("name"))
				end if
				response.write "</a>"
				%>
    </td>
  </tr>
  <tr><td background=imagess/please_dot_1.gif></td></tr>
  <%rs.movenext
	loop
	rs.close
	set rs=nothing%>
</table>
