带分页的.无注入.按转生排的.top100 要的,奇迹私服,传奇私服

带分页的.无注入.按转生排的.top100 要的,奇迹私服,传奇私服
发布时间:2005-9-6 人气:: 作者::佚名
文章来源:不详
支持传奇发展,立即购 买会员

<!--#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>

 

 

友情提示:

炎黄网络--国内最早的传奇私服之一!新开传奇私服、网通传奇私服、电信传奇私服,尽在炎黄网络

传 说 自 炎 黄 启 始 ,利 刃 开 天 地 豪 情
篆 刻 下 不 朽 神 话 ,昂 扬 我 万 世 图 腾

  • 上一篇文章:

  • 下一篇文章:
  • 关于好多网友提出…

  • 让[守卫]随机说些…

  • 添加帐号方法,奇迹…

  • 服务器报错的一些…

  • 手动添加帐号方法…

  • 有关MU最大在线人…

  • 进入后就断线的可…

  • 0.94修改连线人数…

  • 【更新卓越修改】…

  • 在商店中加入新物…

  •