usertop.asp

疯狂DJ联盟-v2.0 1.修改了V1.0的几个错误. 2.首页生成HTM 大大加快了访问速度 3.歌曲播放页面全部调用HTM播放器.减轻了服务器的负担. 4.增加了站内统计,全部访问次数

<!--#include file="conn.asp"-->
<!--#include file="top.asp"-->
<table width="773" height="90" border="0" cellpadding="0" cellspacing="0" bgcolor="#30393D" id="AutoNumber1" style="border-collapse: collapse" align="center">
  <tr>
      
    <td width="5" align="center"> 
      <table border="1" width="768" cellspacing="0" cellpadding="2" style="border-collapse: collapse" bordercolor="#000099" align="center">
        <TR>
                      <TD width=107 bgcolor="#2E5667">
                      <p align="center">会员</TD>
                      <TD width=56 align="center" bgcolor="#2E5667">
                      积分</TD>
                       <td width=123 bgcolor="#2E5667">
                      <p align="center">真实姓名</td>
                      <td width=36 bgcolor="#2E5667">
                      <p align="center">性别</td>
                      <td width=129 bgcolor="#2E5667">
                      <p align="center">OICQ</td>

                    </TR>
                      <%
m=0
set rs=conn.execute("SELECT top 10 points,id,username,truename,sex,oicq FROM user order by points desc") 
if not Rs.eof then
	do while not rs.eof
		m=m+1
%>
                     
                    <TR>
                      <TD width=107 bgcolor="#30393D">&nbsp;<%=m%>.<a href="userinf.asp?id=<%=rs("id")%>"><%=rs("UserName")%></a></TD>
                      <TD width=56 align="center" bgcolor="#30393D"><%=rs("points")%>　</TD>
                      <td width=123 align="center" bgcolor="#30393D"><%=rs("truename")%>　</td>
                      <td width=36 align="center" bgcolor="#30393D"><% if rs("sex")=1 then%>男<%else%>女<%end if%>　</td>
                      <td width=129 align="center" bgcolor="#30393D"><%=rs("oicq")%>　</td>

                    </TR>
<%
	rs.movenext
loop
	else
	response.write "尚无收录"
end if
rs.close
%>
    </table>
    </td>
    </tr>
  </table>
<!--#include file="friendsite.asp"-->


</html>
<%
set rs=nothing
conn.close
set conn=nothing%>