按转生排名无漏洞简洁版(外接转生数据库)
<!--#include
file="Conn.asp" -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html;
charset=gb2312">
<title>打造网络游戏新纪元</title>
<link href="img/css.css" rel="stylesheet" type="text/css">
</head>
<body leftmargin="0" topmargin="0">
<!--#include file="top.asp" -->
<TABLE align=center border=1 cellPadding=0 cellSpacing=0 width=760
borderColor="#666666" frame=vsides rules=none>
<TR>
<td width=204 align=left vAlign=top background="img/left_bg.gif"><img
src="img/left_top_news.gif" width="204" height="36"><img
src="img/left02_top1.gif" width="197" height="40">
<img src="img/120.gif" width="195" height="130"
class="hand">
<table width="195" border="0" cellspacing="0"
cellpadding="3">
<tr>
<td align="center"><img src="img/icon.gif"
width="9" height="15" border="0">
总排行</td>
</tr>
<tr>
<td align="center"><img src="img/icon.gif"
width="9" height="15" border="0">
魔剑士</td>
</tr>
<tr>
<td align="center"><img src="img/icon.gif"
width="9" height="15" border="0">
法 师</td>
</tr>
<tr>
<td align="center"><img src="img/icon.gif"
width="9" height="15" border="0">
魔导士</td>
</tr>
<tr>
<td align="center"><img src="img/icon.gif"
width="9" height="15" border="0">
精 灵</td>
</tr>
<tr>
<td align="center"><img src="img/icon.gif"
width="9" height="15" border="0">
圣射手</td>
</tr>
<tr>
<td align="center"><img src="img/icon.gif"
width="9" height="15" border="0">
剑 士</td>
</tr>
<tr>
<td align="center"><img src="img/icon.gif"
width="9" height="15" border="0">
骑 士 </td>
</tr>
<tr>
<td align="center"><img src="img/icon.gif"
width="9" height="15" border="0">
体 力</td>
</tr>
<tr>
<td align="center"><img src="img/icon.gif"
width="9" height="15" border="0">
力 量</td>
</tr>
<tr>
<td align="center"><img src="img/icon.gif"
width="9" height="15" border="0">
敏 捷</td>
</tr>
<tr>
<td align="center"><img src="img/icon.gif"
width="9" height="15" border="0">
智 力</td>
</tr>
<tr>
<td align="center"><img src="img/icon.gif"
width="9" height="15" border="0">
财 富</td>
</tr>
<tr>
<td align="center"><img src="img/icon.gif"
width="9" height="15" border="0">
PK 值</td>
</tr>
</table>
<table width="99%">
<tr>
<td width="100%" height="5"></td>
</tr>
</table>
<table width="195" background="img/xu2.gif">
<tr>
<td width="182" height="1"></td>
</tr>
</table></TD>
<td width=1 height="190" background="img/xu.gif"></TD>
<td width=553 align=center vAlign=top bgcolor="#FFFFFF"><table
width="99%">
<tr>
<td width="100%" height="5"></td>
</tr>
</table>
<table width="96%" height="90" border="0"
cellpadding="4" cellspacing="1" bordercolorlight="#000000"
bgcolor="#CCCCCC" style="border-collapse: collapse">
<tr>
<td height="20" colspan="9" bgcolor="#FFFFFF">
<p align="center"><font color="#000000">英雄排行表</font></td>
</tr>
<tr>
<td height="20" colspan="9" bgcolor="#FFFFFF">
<p align="center"> </td>
</tr>
<tr bgcolor="#FFFFFF">
<td height="20" colspan="9"> <p align="center">
</td>
</tr>
<tr bgcolor="#f4f4f4">
<td width="7%" height="18" valign="middle">
<p align="center"><font color="#000000">名次</font></td>
<td width="17%" height="18" valign="middle">
<p align="center"><font color="#000000">角色名</font></td>
<td width="8%" height="18" valign="middle">
<p align="center"><font color="#000000">转生</font></td>
<td height="18" valign="middle"> <p align="center"><font
color="#000000">转生时间</font>
</td>
<td width="10%" height="18" valign="middle">
<p align="center"><font color="#000000">点数</font></td>
<td width="9%" height="18" valign="middle">
<p align="center"> </td>
<td width="8%" height="18" valign="middle">
<p align="center"> </td>
<td width="8%" height="18" valign="middle">
<p align="center"> </td>
<td width="9%" height="18" valign="middle">
<p align="center"> </td>
</tr>
<%
lifedbnames="25.mdb"
connstrs = "DBQ="+server.mappath(lifedbnames)+";DefaultDir=;DRIVER={Microsoft
Access Driver (*.mdb)};"
Set connlife = Server.CreateObject("ADODB.Connection")
connlife.Open connstrs
set rslife = Server.CreateObject("ADODB.Recordset")
sqllife="select * from life order by lifecount desc"
rslife.open sqllife,connlife,1,1
do while not rslife.eof
i=i+1
if i mod 2=0 then
bgc="#f4f4f4"
else
bgc="#ffffff"
end if
if i=1 then
ys="990000"
else
ys="#666666"
end if
zhuanshen=rslife("lifecount")&"转"
names=rslife("character")
%>
<tr bgcolor="<%=bgc%>" style="color:<%=ys%>
">
<td width="7%" height="21" valign="middle"
align="center"><%=i%></td>
<td height="21" align="center" valign="middle"><%=names%></td>
<td width="8%" height="21" valign="middle"
align="center"><%=zhuanshen%></td>
<td height="21" align="center" valign="middle"><%=rslife("time")%></td>
<td width="10%" height="21" valign="middle"
align="center"><%=rslife("getpoint")%></td>
<td width="9%" height="21" valign="middle"
align="center"> </td>
<td width="8%" height="21" valign="middle"
align="center"> </td>
<td width="8%" height="21" valign="middle"
align="center"> </td>
<td width="9%" height="21" valign="middle"
align="center"> </td>
<p align="center"> </tr>
<%
if i>=20 then exit do
rslife.movenext
loop
rslife.close
set rslife=nothing
connlife.close
set connlife=nothing
%>
</table>
<table width="99%">
<tr>
<td width="100%" height="5"></td>
</tr>
</table></TD>
</TR>
</TABLE>
<!--#include file="foot.asp" -->
</body>
</html>
|
