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

📄 index_mb2.asp

📁 发布整站源码 可以再开发~ 本人实用中 效果嗷嗷滴~
💻 ASP
📖 第 1 页 / 共 4 页
字号:
end if
%>
<table width="1004" border="0" align="center" cellpadding="5" cellspacing="1" bgcolor="#CCCCCC">
 <%
if menu<>"all" then
sql="select SFdata.id,SFdata.name,SFdata.IP,SFdata.daikuan,SFdata.service,SFdata.renshu,SFdata.Sdate,SFdata.addr,SFdata.xingzhi,SFdata.email,SFdata.homepage,SFdata.download,SFdata.gameid,Gametype.game "
sql=sql&" from SFdata,Gametype where SFdata.gameid=gametype.id and datediff('d',SFdata.Sdate,now())=2 and SFdata.gameid="&menu
sql=sql&" and SFdata.ulock=1 order by SFdata.Sdate desc"
else
sql="select SFdata.id,SFdata.name,SFdata.IP,SFdata.daikuan,SFdata.service,SFdata.renshu,SFdata.Sdate,SFdata.addr,SFdata.xingzhi,SFdata.email,SFdata.homepage,SFdata.download,SFdata.gameid,Gametype.game "
sql=sql&" from SFdata,Gametype where SFdata.gameid=gametype.id and datediff('d',SFdata.Sdate,now())=2"
sql=sql&" and SFdata.ulock=1 order by SFdata.Sdate desc"
end if
rs.open sql,conn,1,1 
if rs.eof and rs.bof then
rs.close
else
%> 
  <tr bordercolor="#FFFFFF" bgcolor="#FF0000" class="style52">
    <td class="style6"><div align="center"><span class="style3">↓<%if rs("Sdate")<>"" then response.write year(rs("sdate"))&"年"&month(rs("sdate"))&"月"&day(rs("Sdate"))&"日"&"已经开放的服务器"%>↓</span></div></td>
  <%do while not rs.eof%>
 </tr><% 
rs.movenext
loop
%>
</table>
<%
rs.close
end if
%>
  <%
if menu<>"all" then
sql="select SFdata.id,SFdata.name,SFdata.IP,SFdata.daikuan,SFdata.service,SFdata.renshu,SFdata.Sdate,SFdata.addr,SFdata.xingzhi,SFdata.email,SFdata.homepage,SFdata.download,SFdata.gameid,Gametype.game "
sql=sql&" from SFdata,Gametype where SFdata.gameid=gametype.id and datediff('d',SFdata.Sdate,now())=2 and SFdata.gameid="&menu
sql=sql&" and SFdata.ulock=1 order by SFdata.Sdate desc"
else
sql="select SFdata.id,SFdata.name,SFdata.IP,SFdata.daikuan,SFdata.service,SFdata.renshu,SFdata.Sdate,SFdata.addr,SFdata.xingzhi,SFdata.email,SFdata.homepage,SFdata.download,SFdata.gameid,Gametype.game "
sql=sql&" from SFdata,Gametype where SFdata.gameid=gametype.id and datediff('d',SFdata.Sdate,now())=2"
sql=sql&" and SFdata.ulock=1 order by SFdata.Sdate desc"
end if
rs.open sql,conn,1,1 
if rs.eof and rs.bof then
rs.close
else
%>

<table width="1004" border="0" align="center" cellpadding="5" cellspacing="1" bgcolor="#FF9900">
<%do while not rs.eof%>
   <tr bordercolor="#FFFFFF" bgcolor="#FFFFcc" class="style52" onmouseover=javascript:this.bgColor='#FFee88' onmouseout=javascript:this.bgColor='#ffffcc'>
    <td class="style6">&nbsp;<a href=display.asp?id=<%=rs("id")%> target=show><%=rs("name")%></a></td>
    <td class="style6" width="108">&nbsp;<%=rs("IP")%></td>
    <td class="style49" width="201">&nbsp;<%if rs("Sdate")<>"" then response.write year(rs("sdate"))&"年/"&month(rs("sdate"))&"月/"&day(rs("Sdate"))&"日/"&hour(rs("sdate"))&"点开放"%></td>
    <td class="style49" width="77"><%=rs("Addr")%><%=split(ssign,",")(rs("Service"))%></td>
    <td class="style49" width="131"><%=rs("xingzhi")%></td>
    <td class="style6" width="126">客服QQ:<%if rs("email")="" or rs("email")="http://" then%><a href=http://wpa.qq.com/msgrd?V=1&Uin=<%=rs("email")%>&Site=奇诺私服发布网&Menu=yes target=show><%else%><a href=http://wpa.qq.com/msgrd?V=1&Uin=<%=rs("email")%>&Site=奇诺私服发布网&Menu=yes target=show><%end if%><%=rs("email")%></a></td>
    <td class="style6" width="92"><a href=display.asp?id=<%=rs("id")%> target=show>点击查看</a></td>
    <td class="style5" width="82">★★★★★</td>
  </tr>   <% 
rs.movenext
loop
%>

  </table>
  <%
rs.close
end if
%>

<table width="1004" border="0" align="center" cellpadding="5" cellspacing="1" bgcolor="#CCCCCC">
  <%
if menu<>"all" then
sql="select SFdata.id,SFdata.name,SFdata.IP,SFdata.daikuan,SFdata.service,SFdata.renshu,SFdata.Sdate,SFdata.addr,SFdata.xingzhi,SFdata.email,SFdata.homepage,SFdata.download,SFdata.gameid,Gametype.game "
sql=sql&" from SFdata,Gametype where SFdata.gameid=gametype.id and datediff('d',SFdata.Sdate,now())=3 and SFdata.gameid="&menu
sql=sql&" and SFdata.ulock=1 order by SFdata.Sdate desc"
else
sql="select SFdata.id,SFdata.name,SFdata.IP,SFdata.daikuan,SFdata.service,SFdata.renshu,SFdata.Sdate,SFdata.addr,SFdata.xingzhi,SFdata.email,SFdata.homepage,SFdata.download,SFdata.gameid,Gametype.game "
sql=sql&" from SFdata,Gametype where SFdata.gameid=gametype.id and datediff('d',SFdata.Sdate,now())=3"
sql=sql&" and SFdata.ulock=1 order by SFdata.Sdate desc"
end if
rs.open sql,conn,1,1 
if rs.eof and rs.bof then
rs.close
else
%>

  <tr bordercolor="#FFFFFF" bgcolor="#FF0000" class="style52">
    <td class="style6"><div align="center"><span class="style3">↓<%if rs("Sdate")<>"" then response.write year(rs("sdate"))&"年"&month(rs("sdate"))&"月"&day(rs("Sdate"))&"日"&"已经开放的服务器"%>↓</span></div></td>
  <%do while not rs.eof%>
</tr><% 
rs.movenext
loop
%>
</table>
<%
rs.close
end if
%>

  <%
if menu<>"all" then
sql="select SFdata.id,SFdata.name,SFdata.IP,SFdata.daikuan,SFdata.service,SFdata.renshu,SFdata.Sdate,SFdata.addr,SFdata.xingzhi,SFdata.email,SFdata.homepage,SFdata.download,SFdata.gameid,Gametype.game "
sql=sql&" from SFdata,Gametype where SFdata.gameid=gametype.id and datediff('d',SFdata.Sdate,now())=3 and SFdata.gameid="&menu
sql=sql&" and SFdata.ulock=1 order by SFdata.Sdate desc"
else
sql="select SFdata.id,SFdata.name,SFdata.IP,SFdata.daikuan,SFdata.service,SFdata.renshu,SFdata.Sdate,SFdata.addr,SFdata.xingzhi,SFdata.email,SFdata.homepage,SFdata.download,SFdata.gameid,Gametype.game "
sql=sql&" from SFdata,Gametype where SFdata.gameid=gametype.id and datediff('d',SFdata.Sdate,now())=3"
sql=sql&" and SFdata.ulock=1 order by SFdata.Sdate desc"
end if
rs.open sql,conn,1,1 
if rs.eof and rs.bof then
rs.close
else
%>
<table width="1004" border="0" align="center" cellpadding="5" cellspacing="1" bgcolor="#FF9900">
<%do while not rs.eof%>
   <tr bordercolor="#FFFFFF" bgcolor="#FFFFcc" class="style52" onmouseover=javascript:this.bgColor='#FFee88' onmouseout=javascript:this.bgColor='#ffffcc'>
    <td class="style6">&nbsp;<a href=display.asp?id=<%=rs("id")%> target=show><%=rs("name")%></a></td>
    <td class="style6" width="108">&nbsp;<%=rs("IP")%></td>
    <td class="style49" width="201">&nbsp;<%if rs("Sdate")<>"" then response.write year(rs("sdate"))&"年/"&month(rs("sdate"))&"月/"&day(rs("Sdate"))&"日/"&hour(rs("sdate"))&"点开放"%></td>
    <td class="style49" width="77"><%=rs("Addr")%><%=split(ssign,",")(rs("Service"))%></td>
    <td class="style49" width="131"><%=rs("xingzhi")%></td>
    <td class="style6" width="126">客服QQ:<%if rs("email")="" or rs("email")="http://" then%><a href=http://wpa.qq.com/msgrd?V=1&Uin=<%=rs("email")%>&Site=奇诺私服发布网&Menu=yes target=show><%else%><a href=http://wpa.qq.com/msgrd?V=1&Uin=<%=rs("email")%>&Site=奇诺私服发布网&Menu=yes target=show><%end if%><%=rs("email")%></a></td>
    <td class="style6" width="92"><a href=display.asp?id=<%=rs("id")%> target=show>点击查看</a></td>
    <td class="style5" width="82">★★★★★</td>
  </tr>   
<% 
rs.movenext
loop
%>
</table>
  <%
rs.close
end if
%>
  
<table width="1004" border="0" align="center" cellpadding="5" cellspacing="1" bgcolor="#CCCCCC">
<%
if menu<>"all" then
sql="select SFdata.id,SFdata.name,SFdata.IP,SFdata.daikuan,SFdata.service,SFdata.renshu,SFdata.Sdate,SFdata.addr,SFdata.xingzhi,SFdata.email,SFdata.homepage,SFdata.download,SFdata.gameid,Gametype.game "
sql=sql&" from SFdata,Gametype where SFdata.gameid=gametype.id and datediff('d',SFdata.Sdate,now())=4 and SFdata.gameid="&menu
sql=sql&" and SFdata.ulock=1 order by SFdata.Sdate desc"
else
sql="select SFdata.id,SFdata.name,SFdata.IP,SFdata.daikuan,SFdata.service,SFdata.renshu,SFdata.Sdate,SFdata.addr,SFdata.xingzhi,SFdata.email,SFdata.homepage,SFdata.download,SFdata.gameid,Gametype.game "
sql=sql&" from SFdata,Gametype where SFdata.gameid=gametype.id and datediff('d',SFdata.Sdate,now())=4"
sql=sql&" and SFdata.ulock=1 order by SFdata.Sdate desc"
end if
rs.open sql,conn,1,1 
if rs.eof and rs.bof then
rs.close
else
%>

  <tr bordercolor="#FFFFFF" bgcolor="#FF0000" class="style52">
   <td class="style6"><div align="center"><span class="style3">↓<%if rs("Sdate")<>"" then response.write year(rs("sdate"))&"年"&month(rs("sdate"))&"月"&day(rs("Sdate"))&"日"&"已经开放的服务器"%>↓</span></div></td>
  <%do while not rs.eof%></tr><% 
rs.movenext
loop
%>
</table>
<%
rs.close
end if
%>
  <%
if menu<>"all" then
sql="select SFdata.id,SFdata.name,SFdata.IP,SFdata.daikuan,SFdata.service,SFdata.renshu,SFdata.Sdate,SFdata.addr,SFdata.xingzhi,SFdata.email,SFdata.homepage,SFdata.download,SFdata.gameid,Gametype.game "
sql=sql&" from SFdata,Gametype where SFdata.gameid=gametype.id and datediff('d',SFdata.Sdate,now())=4 and SFdata.gameid="&menu
sql=sql&" and SFdata.ulock=1 order by SFdata.Sdate desc"
else
sql="select SFdata.id,SFdata.name,SFdata.IP,SFdata.daikuan,SFdata.service,SFdata.renshu,SFdata.Sdate,SFdata.addr,SFdata.xingzhi,SFdata.email,SFdata.homepage,SFdata.download,SFdata.gameid,Gametype.game "
sql=sql&" from SFdata,Gametype where SFdata.gameid=gametype.id and datediff('d',SFdata.Sdate,now())=4"
sql=sql&" and SFdata.ulock=1 order by SFdata.Sdate desc"
end if
rs.open sql,conn,1,1 
if rs.eof and rs.bof then
rs.close
else
%>
<table width="1004" border="0" align="center" cellpadding="5" cellspacing="1" bgcolor="#FF9900">
<%do while not rs.eof%>
   <tr bordercolor="#FFFFFF" bgcolor="#FFFFcc" class="style52" onmouseover=javascript:this.bgColor='#FFee88' onmouseout=javascript:this.bgColor='#ffffcc'>
    <td class="style6">&nbsp;<a href=display.asp?id=<%=rs("id")%> target=show><%=rs("name")%></a></td>
    <td class="style6" width="108">&nbsp;<%=rs("IP")%></td>
    <td class="style49" width="201">&nbsp;<%if rs("Sdate")<>"" then response.write year(rs("sdate"))&"年/"&month(rs("sdate"))&"月/"&day(rs("Sdate"))&"日/"&hour(rs("sdate"))&"点开放"%></td>
    <td class="style49" width="77"><%=rs("Addr")%><%=split(ssign,",")(rs("Service"))%></td>
    <td class="style49" width="131"><%=rs("xingzhi")%></td>
    <td class="style6" width="126">客服QQ:<%if rs("email")="" or rs("email")="http://" then%><a href=http://wpa.qq.com/msgrd?V=1&Uin=<%=rs("email")%>&Site=奇诺私服发布网&Menu=yes target=show><%else%><a href=http://wpa.qq.com/msgrd?V=1&Uin=<%=rs("email")%>&Site=奇诺私服发布网&Menu=yes target=show><%end if%><%=rs("email")%></a></td>
    <td class="style6" width="92"><a href=display.asp?id=<%=rs("id")%> target=show>点击查看</a></td>
    <td class="style5" width="82">★★★★★</td>
  </tr>   
<% 
rs.movenext
loop
%>
</table>
  <%
rs.close
end if
%>
<table width="1004" border="0" cellpadding="0" cellspacing="1" align="center" bgcolor="#FF0000">
<tr>
<td width="1002" valign="top">
<table width="100%" border="0" cellpadding="5" cellspacing="0" bgcolor="#FF0000">
<tr>
  <td width="1002" valign="middle" align="center"><p>
	<img src="17b_Net_img/ldtt.jpg" width="926" height="80" border="0"></p>
    </td>
</tr>
</table>
</td>
</tr>
</table>

<!-- 所有私服信息列表(不包括今日新开、明日即将开放、昨天已经开放的私服) -->
<table  width="1004" border="0" align="center" cellpadding="5" cellspacing="1" bgcolor="#CCCCCC">
  <tr bgColor=#808080>
<td width="96"><div align="left"><b><font color="#FFFFFF">千年服务器名</font></b></div></td>
    <td width="107"><div align="left"><b><font color="#FFFFFF">服务器IP</font></b></div></td>
    <td width="202"><div align="left"><b><font color="#FFFFFF">开放时间 年/月/日/时</font></b></div></td>
    <td width="77" align="center"><div align="left"><b><font color="#FFFFFF">线路类别</font></b></div></td>
    <td width="129"><div align="left"><b><font color="#FFFFFF">版本介绍</font></b></div></td>
    <td width="128"><div align="left"><b><font color="#FFFFFF">客服QQ</font></b></div></td>
    <td width="95" align="center"><div align="left"><b><font color="#FFFFFF">详细介绍</font></b></div></td>
    <td width="81"><div align="left"><b><font color="#FFFFFF">推荐星级</font></b></div></td>
  </tr>
    <tr bgcolor="#990000">
    <td width="96"><div align="left"><b><font color="#FFFFFF">千年服务器名</font></b></div></td>
    <td width="107" bgcolor="#990000"><div align="left"><b><font color="#FFFFFF">服务器IP</font></b></div></td>
    <td width="202"><div align="left"><b><font color="#FFFFFF">开放时间 年/月/日/时</font></b></div></td>
    <td width="77" align="center"><div align="left"><b><font color="#FFFFFF">线路类别</font></b></div></td>
    <td width="129"><div align="left"><b><font color="#FFFFFF">版本介绍</font></b></div></td>
    <td width="128"><div align="left"><b><font color="#FFFFFF">客服QQ</font></b></div></td>
    <td width="95" align="center"><div align="left"><b><font color="#FFFFFF">详细介绍</font></b></div></td>
    <td width="81"><div align="left"><b><font color="#FFFFFF">推荐星级</font></b></div></td>
  </tr>
    <%
	if menu<>"all" then
sql="select SFdata.id,SFdata.name,SFdata.IP,SFdata.daikuan,SFdata.service,SFdata.renshu,SFdata.Sdate,SFdata.addr,SFdata.xingzhi,SFdata.homepage,SFdata.download,SFdata.gameid,Gametype.game "
sql=sql&" from SFdata,Gametype where SFdata.gameid=gametype.id and datediff('d',SFdata.Sdate,now())<>0 and datediff('d',SFdata.Sdate,now())<>1 and datediff('d',SFdata.Sdate,now())<>-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.daikuan,SFdata.service,SFdata.renshu,SFdata.Sdate,SFdata.addr,SFdata.xingzhi,SFdata.homepage,SFdata.download,SFdata.gameid,Gametype.game "
sql=sql&" from SFdata,Gametype where SFdata.gameid=gametype.id and datediff('d',SFdata.Sdate,now())<>0 and datediff('d',SFdata.Sdate,now())<>1 and datediff('d',SFdata.Sdate,now())<>-1"
sql=sql&" and SFdata.ulock=1 order by SFdata.addtime desc"
	end if

	rs.open sql,conn,1,1 

⌨️ 快捷键说明

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