|
<!--#include file="conn.asp" --> <!--#include file="top.asp" --> <% dim m,n set rs=server.createobject("adodb.recordset") job1=request("job1") job1=left(request("job1"),4) job2=left(request("job2"),4) rs.pagesize=100 nowpage=left(request("page"),8) if nowpage&"x"="x" then nowpage=1 else nowpage=cint(nowpage) end if rs.absolutepage=nowpage %> <center> <table width="778" height="393" background="images/top_bg5.gif"> <form action="userrz_ok.asp" method="post"> <tr> <td width="750" height="35" valign="middle"> <p align="center"><font size=+1><b><%=muname%> <%=muip%> <%=muport%></b></font></p> </td> </tr> <tr>
<td height="353" valign="top"> <div align="center"> <center> <table border="1" width="82%" cellspacing="0" cellpadding="0" height="103" background="images/top_bg5.gif" style="border-collapse: collapse" bordercolor="#111111" bordercolorlight="#000000"> <tr> <td width="100%" height="20" colspan="9"> <p align="center"><font color="#000000">等级排行表</td> </tr> <tr> <td width="100%" height="20" colspan="9"> <p align="center"><a href="?job1=32&job2=33"><font color="#ff0000">精灵</font></a><font color="#FF0000"> </font><a href="?job1=16&job2=17"><font color="#FF0000">剑士</font></a><font color="#FF0000"> </font><a href="?job1=0&job2=1"><font color="#FF0000">法师</font></a><font color="#FF0000"> </font><a href="?job1=48&job2=48"><font color="#FF0000">魔剑士</font></a><font color="#FF0000"> </font><a href="?job1="><font color="#FF0000">总排行</font></a></td> </tr> <tr> <td width="6%" height="21" valign="middle"> <p align="center"><font color="#000000">名次</font></td> <td width="14%" height="21" valign="middle"> <p align="center"><font color="#000000">用户名</font></td> <td width="5%" height="21" valign="middle"> <p align="center"><font color="#000000">转生</font></td> <td width="10%" height="21" valign="middle"> <p align="center"><font color="#000000">等级</font></td> <td width="11%" height="21" valign="middle"> <p align="center"><font color="#000000">PK值</font></td> <td width="6%" height="21" valign="middle"> <p align="center"><font color="#000000">PK数</font></td> <td width="18%" height="21" valign="middle"> <p align="center"><font color="#000000">个人财富</font></td> <td width="20%" height="21" valign="middle"> <p align="center"><font color="#000000">创建日期</font></td> </td> </tr> <%if job1="" then sql="select top 500 Name,clifecount,cLevel,Class,PkTime,pkcount,Money,MDate from Character order by mingci,clifecount desc,cLevel desc" rs.open sql,conn,1,1 tatalrecord=rs.recordcount tatalpages=rs.pagecount rs.movefirst if nowpage&"x"="x" then else nowpage=cint(nowpage) end if rs.absolutepage=nowpage
else sql="select Name,clifecount,cLevel,Class,PkTime,pkcount,Money,MDate from Character where Class="&job1&" or class="&job2&" order by mingci,clifecount desc,cLevel desc" rs.open sql,conn,1,1 end if if left(request("dy"),8)<>Empty then response.clear response.write "document.write(<table><tr><td colspan=3 align=center>私服排行前"&left(request("dy"),8)&"名</td></tr>);" for n=1 to rs.recordcount if not rs.eof then response.write "document.write(<tr><td>第"&n&"名</td><td>"&rs("Name")&"</td><td>"&rs("cLevel")&"级</td></tr>);" else exit for end if if n>=int(left(request("dy"),8)) then exit for rs.movenext next response.write "document.write(</table>)" response.end else %>
<%n=1 m=nowpage*rs.pagesize-rs.pagesize+1 while not rs.eof and n<=rs.pagesize %> <% m=nowpage*rs.pagesize-rs.pagesize+1 %>
<tr> <td width="6%" height="21" valign="middle" align="center"><%=m%></td> <td width="14%" height="21" valign="middle" align="center"><%=rs("Name")%></td> <td width="5%" height="21" valign="middle" align="center"><%=rs("clifecount")%></td> <td width="10%" height="21" valign="middle" align="center"><%=rs("cLevel")%></td> <td width="11%" height="21" valign="middle" align="center"><%=rs("PkTime")%></td> <td width="6%" height="21" valign="middle" align="center"><%=rs("Pkcount")%></td> <td width="18%" height="21" valign="middle" align="center"><%=rs("Money")%></td> <td width="20%" height="21" valign="middle" align="center"><%=rs("MDate")%></td> <p align="center"></td> </tr> <% n=n+1 m=m+1 rs.movenext wend
end if rs.close %>
</table> <Br> 共:<%=tatalpages%>页 当前为:<%=nowpage%>页 <%if nowpage>1 then%> <a class=null href="?page=<%=nowpage-1%>">上一页</a> <%else%> 上一页 <%end if%> <%for k=1 to tatalpages%> <%if k<>nowpage then %> <a class=null href="?page=<%=k%>"><%=k%></a> <%else%> <%=k%> <%end if%> <%next%> <%if nowpage < tatalpages then%> <a class=null href="?page=<%=nowpage+1%>">下一页</a> <%else%> 下一页 <%end if%> <%if nowpage<>1 then%> <a class=null href="?page=<%=1%>"> 首页</a> <%else%> 首页 <%end if%> <%if nowpage<>tatalpages then %> <a class=null href="?page=<%=tatalpages%>">末页</a> <%else%> 末页 <%end if%>
<p><img border="0" src="images/bt_confirm.gif" style="cursor:hand" onclick="javascript:top.location.href=index.asp"></p> </center> </div> </td> </tr> </form> </table>
<!--#include file="copyright.asp" --> </body> </html>
|