⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 mini.asp

📁 发布整站源码 可以再开发~ 本人实用中 效果嗷嗷滴~
💻 ASP
字号:
🔍 
<!--#include file="config.asp"-->
<!--#include file="conn.asp"-->
<!--#include file="code.asp"-->
<%
if not isempty(request("page")) then
	currentPage=cint(request("page"))
else
	currentPage=1
end if
menu=htmlencode(request("menu"))
if menu="" or (not isnumeric(menu)) or isnull(menu) then
	menu="all"
end if
set rs = server.createobject("adodb.recordset")
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>[奇诺]17B.Net中国私服排行榜</title>
<META HTTP-EQUIV="Refresh" content="300">
<style type="text/css">
<!--
body,td,th {
	font-size: 12px;
}
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
}
a:link {
	text-decoration: none;
	color: #FF0000;
}
a:visited {
	text-decoration: none;
	color: #FF6600;
}
a:hover {
	text-decoration: underline;
	color: #00FFFF;
}
a:active {
	text-decoration: none;
}
.style4 {
	color: #0000FF;
	font-weight: bold;
}
.style5 {color: #FFFF00}
.style7 {color: #FF0000}
.style8 {
	color: #FFFFFF;
	font-weight: bold;
}
.style9 {color: #FFFFFF}
.style10 {font-weight: bold}
-->
</style>
</head>
<body>
<table width="222"  border="0" align="center" cellpadding="5" cellspacing="0">
  <tr>
    <td bgcolor="#FF0000"><div align="center" class="style5">奇诺私服排行榜，世界排名4000强</div></td>
  </tr>
</table>
<div align="center"></div>
<table width="222"  border="0" align="center" cellpadding="5" cellspacing="1" bgcolor="#FF0000">
  <tr bgcolor="#FFFFCC">
    <td><div align="center"><a href="index.asp?menu=1" target="_blank" class="style7"><strong>千年私服排行榜</strong></a></div></td>
    <td><div align="center"><a href="index.asp?menu=2" target="_blank" class="style7"><strong>奇迹私服排行榜</strong></a></div></td>
  </tr>
</table>
<table width="222"  border="0" align="center" cellpadding="5" cellspacing="1" bgcolor="#FF0000">
  <tr bgcolor="#FFFFCC">
    <td><div align="center"><a href="index.asp?menu=9" target="_blank" class="style7"><strong>传世私服排行榜</strong></a></div></td>
    <td><div align="center"><a href="index.asp?menu=4" target="_blank" class="style7"><strong>魔兽私服排行榜</strong></a></div></td>
  </tr>
</table>
<table width="222"  border="0" align="center" cellpadding="5" cellspacing="1" bgcolor="#FF0000">
  <tr bgcolor="#FFFFCC">
    <td><div align="center"><a href="index.asp?menu=5" target="_blank" class="style7"><strong>传三私服排行榜</strong></a></div></td>
    <td><div align="center"><a href="index.asp?menu=6" target="_blank" class="style7"><strong>天二私服排行榜</strong></a></div></td>
  </tr>
</table>
<table width="222"  border="0" align="center" cellpadding="5" cellspacing="1" bgcolor="#FF0000">
  <tr bgcolor="#FFFFCC">
    <td><div align="center"><a href="index.asp?menu=8" target="_blank" class="style7"><strong>千年私服排行榜</strong></a></div></td>
    <td><div align="center"><a href="index.asp" target="_blank" class="style7"><strong>中国私服排行榜</strong></a></div></td>
  </tr>
</table>
<table width="222" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td><img src="image/mini01.gif" width="222" height="25"></td>
  </tr>
</table>
<table width="222" border="0" align="center" cellpadding="3" cellspacing="0">
  <tr>
    <td bgcolor="#FFFFFF"><div align="center"><a href="mini.asp"><strong>·点击这里自动刷新查看最新私服·</strong></a></div></td>
  </tr>
</table>

<!-- 推荐开机私服信息预告 -->
<table width="222" border="0" align="center" cellpadding="1" cellspacing="1" bgcolor="#FF0000">
  <tr bgcolor="#FF0000">
    <td height="24" colspan="3" bgcolor="#C0C0C0">
	<p align="center"><b>推荐私服开机列表</b></td>
  </tr>

  <tr>
    <td height="24" style="font-size: 12px"><span class="style8">服务器名</span></td>
    <td style="font-size: 12px"><span class="style8">服务器IP</span></td>
    <td style="font-size: 12px"><span class="style8">开机时间</span></td>
  </tr>
  <%
if menu<>"all" then
sql="select SFdata.id,SFdata.name,SFdata.IP,SFdata.Sdate,SFdata.homepage,SFdata.gameid,Gametype.game "
sql=sql&" from SFdata,Gametype where SFdata.gameid=gametype.id and SFdata.top=1 and SFdata.gameid="&menu
sql=sql&" and SFdata.ulock=1 order by SFdata.addtime desc"
else
sql="select SFdata.id,SFdata.name,SFdata.IP,SFdata.Sdate,SFdata.homepage,SFdata.gameid,Gametype.game "
sql=sql&" from SFdata,Gametype where SFdata.gameid=gametype.id and SFdata.top=1"
sql=sql&" and SFdata.ulock=1 order by SFdata.addtime desc"
end if
rs.open sql,conn,1,1 
if rs.eof and rs.bof then
response.write "<tr bgColor=#FFFFFF><td colspan=9 align=center>当前没有推荐私服！如需推荐，请与管理员（"&webmaster&"）联系。</td></tr>"
rs.close
else
%>  <%do while not rs.eof%>
<tr bgcolor="#FFFF00">
    <td height="24"><a href=display.asp?id=<%=rs("id")%> target=show><%=rs("name")%></a></td>
    <td><span class="style7"><%=rs("IP")%></span></td>
    <td class="style7"><%if rs("Sdate")<>"" then response.write month(rs("sdate"))&"/"&day(rs("Sdate"))&"/"&hour(rs("sdate"))&"点"%></td>
  </tr>
<% 
rs.movenext
loop
%>

</table>
<table width="222" border="0" align="center" cellpadding="3" cellspacing="0">
  <tr>
    <td height="10" bgcolor="#FFFFFF"></td>
  </tr>
</table>
<%
rs.close
end if
%>

<!-- 今日开机私服信息预告 -->
<table width="222" border="0" align="center" cellpadding="1" cellspacing="1" bgcolor="#FF0000">

  <tr bgcolor="#FF0000">
    <td height="24" colspan="3" bgcolor="#C0C0C0">
	<p align="center"><b>今日私服开机列表</b></td>
  </tr>

  <tr>
    <td height="24" style="font-size: 12px"><span class="style8">服务器名</span></td>
    <td style="font-size: 12px"><span class="style8">服务器IP</span></td>
    <td style="font-size: 12px"><span class="style8">开机时间</span></td>
  </tr>
  <%
if menu<>"all" then
sql="select SFdata.id,SFdata.name,SFdata.IP,SFdata.Sdate,Gametype.game "
sql=sql&" from SFdata,Gametype where SFdata.gameid=gametype.id and datediff('d',SFdata.Sdate,now())=0 and SFdata.gameid="&menu
sql=sql&" and SFdata.ulock=1 order by SFdata.Sdate"
else
sql="select SFdata.id,SFdata.name,SFdata.IP,SFdata.Sdate,Gametype.game "
sql=sql&" from SFdata,Gametype where SFdata.gameid=gametype.id and datediff('d',SFdata.Sdate,now())=0"
sql=sql&" and SFdata.ulock=1 order by SFdata.Sdate"
end if
rs.open sql,conn,1,1 
if rs.eof and rs.bof then
rs.close
else
%> <%do while not rs.eof%>
<tr bgcolor="#FFFF00">
    <td height="24"><a href=display.asp?id=<%=rs("id")%> target=show><%=rs("name")%></a></td>
    <td><span class="style7"><%=rs("IP")%></span></td>
    <td class="style7"><%if rs("Sdate")<>"" then response.write month(rs("sdate"))&"/"&day(rs("Sdate"))&"/"&hour(rs("sdate"))&"点"%></td>
  </tr>
<% 
rs.movenext
loop
%>

</table>
<table width="222" border="0" align="center" cellpadding="3" cellspacing="0">
  <tr>
    <td height="10" bgcolor="#FFFFFF"></td>
  </tr>
</table>
<%
rs.close
end if
%>
<!-- 明日开机私服信息预告 -->
<table width="222" border="0" align="center" cellpadding="1" cellspacing="1" bgcolor="#FF0000">
  <tr bgcolor="#FF0000">
    <td height="24" colspan="3" bgcolor="#C0C0C0">
	<p align="center"><b>明日私服开机列表</b></td>
  </tr>

  <tr>
    <td height="24" style="font-size: 12px"><span class="style8">服务器名</span></td>
    <td style="font-size: 12px"><span class="style8">服务器IP</span></td>
    <td style="font-size: 12px"><span class="style8">开机时间</span></td>
  </tr>
  <%
if menu<>"all" then
sql="select SFdata.id,SFdata.name,SFdata.IP,SFdata.Sdate,SFdata.homepage,SFdata.gameid,Gametype.game "
sql=sql&" from SFdata,Gametype where SFdata.gameid=gametype.id and datediff('d',SFdata.Sdate,now())=-1 and SFdata.gameid="&menu
sql=sql&" and SFdata.ulock=1 order by SFdata.Sdate"
else
sql="select SFdata.id,SFdata.name,SFdata.IP,SFdata.Sdate,SFdata.homepage,SFdata.gameid,Gametype.game "
sql=sql&" from SFdata,Gametype where SFdata.gameid=gametype.id and datediff('d',SFdata.Sdate,now())=-1"
sql=sql&" and SFdata.ulock=1 order by SFdata.Sdate"
end if
rs.open sql,conn,1,1 
if rs.eof and rs.bof then
rs.close
else
%>  <%do while not rs.eof%>
<tr bgcolor="#FFFF00">
    <td height="24"><a href=display.asp?id=<%=rs("id")%> target=show><%=rs("name")%></a></td>
    <td><span class="style7"><%=rs("IP")%></span></td>
    <td class="style7"><%if rs("Sdate")<>"" then response.write month(rs("sdate"))&"/"&day(rs("Sdate"))&"/"&hour(rs("sdate"))&"点"%></td>
  </tr>
<% 
rs.movenext
loop
%>

</table>
<table width="222" border="0" align="center" cellpadding="3" cellspacing="0">
  <tr>
    <td height="10" bgcolor="#FFFFFF"></td>
  </tr>
</table>
<%
rs.close
end if
%>
<table width="222" border="0" align="center" cellpadding="5" cellspacing="0">
  <tr>
    <td height="25" bgcolor="#FFFFCC"><div align="center"><a href="/" target="_blank">[奇诺首页]</a><a href="add.asp" target="_blank">[发布私服]</a> 
        <font color="#FF0000">[<SCRIPT language="javascript" src="http://c.s05.51.la//j/672.js"></SCRIPT><NOSCRIPT><A href="http://www.51.la/?s=3005&id=672" title="51.la Free Site Stats" target="_blank"><IMG src="http://c.s05.51.la//s.asp?siteid=672&t=img" border="0"></A></NOSCRIPT>]</font></div></td>
  </tr>
  <tr>
    <td height="25" bgcolor="#FF0000"><div align="center" class="style9">2005 
		17B.Net 广告合作QQ:678226</div></td>
  </tr>
</table>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -