📄 exmoneylist.asp
字号:
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>蓝雨聊天室(现金排行榜)</title>
<style type="text/css"><!--
.p9 { font-size: 9pt; line-height: 14pt}
-->
</style>
</head>
<!--#include file="admin/conn.asp"-->
<%
page1="<a href=""exmoneylist.asp?num=1"">第1页</a>"
page2="<a href=""exmoneylist.asp?num=2"">第2页</a>"
page3="<a href=""exmoneylist.asp?num=3"">第3页</a>"
startnum=0
num=request("num")
if num="2" then
startnum=20
page2="第2页"
elseif num="3" then
startnum=40
page3="第3页"
else
startnum=0
page1="第1页"
end if
usernum=0
Conn = DBCN()
set rs = Server.CreateObject("ADODB.Recordset")
sql="select count(*) from [user]"
rs.open sql,conn,3
usernum=rs(0)
rs.close
%>
<body bgcolor="#C0C0C0" topmargin="5" leftmargin="5">
<table border="2" width="100%" height="100%" bordercolor="#A5A5A5" bordercolorlight="#A5A5A5"
bordercolordark="#A5A5A5" cellspacing="0" cellpadding="5">
<tr>
<td width="100%" bgcolor="#C3C3C3" height="10%"><table border="0" width="100%">
<tr>
<td width="20%"><strong>现金排行榜</strong></td>
<td width="80%" align="right" class="p9">共有<font color="#8000FF"><%=usernum%></font>名注册会员 <%=page1%> <%=page2%> <%=page3%> <input
type="button" value="关闭窗口" onclick="window.close()"></td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="100%" valign="top" bgcolor="#E2E2E4"><table border="1" width="100%" cellspacing="0"
cellpadding="0" bordercolor="#C0C0C0">
<tr align="center" bgcolor="#BEC6CD" class="p9">
<td width="10%"><font color="#8000FF">名字</font></td>
<td width="10%"><font color="#8000FF">OICQ</font></td>
<td width="25%"><font color="#8000FF">个人简介</font></td>
<td width="10%"><font color="#8000FF">现金</font></td>
<td width="10%"><font color="#8000FF">存款</font></td>
<td width="11%"><font color="#8000FF">总资产</font></td>
<td width="10%"><font color="#8000FF">经验值</font></td>
<td width="8%"><font color="#8000FF">魅力</font></td>
<td width="7%"><font color="#8000FF">被踢</font></td>
</tr>
<%
sql="select Top 60 username,oicq,email,biography,experi,money,kickcount,bmoney,meili,jobid from [user] order by experi desc"
rs.open sql,conn,3
icount=0
do while (Not rs.eof)
icount=icount+1
if icount>startnum and icount<=startnum+20 then
allmoney=rs("money")+rs("bmoney")
response.write "<tr class=""p9"">"
response.write " <td width=""10%"">"&rs("username")&"</td>"
response.write " <td width=""10%"">"&rs("oicq")&" </td>"
response.write " <td width=""25%"">"& rs("biography")&" </td>"
response.write " <td width=""10%"">"&rs("money")&"</td>"
response.write " <td width=""10%"">"&rs("bmoney")&"</td>"
response.write " <td width=""11%"">"&allmoney&"</td>"
response.write " <td width=""10%"">"& rs("experi")&"</td>"
response.write " <td width=""8%"">"&rs("meili")&"</td>"
response.write " <td width=""8%"">"&rs("kickcount")&"</td>"
response.write "</tr>"
end if
rs.movenext
loop
rs.close
set rs=nothing
%>
</table>
</td>
</tr>
</table>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -