 
总排行 |
魔剑士 |
法 师 |
魔导士 |
精 灵 |
圣射手 |
剑 士 |
骑 士 |
体 力 |
力 量 |
敏 捷 |
智 力 |
财 富 |
PK 值 |
|
|
英雄排行表 |
|
|
名次 |
角色名 |
转生 |
转生时间
|
点数 |
|
|
|
|
<%
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")
%>
<%=i%> |
<%=names%> |
<%=zhuanshen%> |
<%=rslife("time")%> |
<%=rslife("getpoint")%> |
|
|
|
|
<%
if i>=20 then exit do
rslife.movenext
loop
rslife.close
set rslife=nothing
connlife.close
set connlife=nothing
%>
|
