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

📄 tournament.asp

📁 泡泡堂服务端内有建站说明,喜欢玩泡泡堂的朋友下载开发.
💻 ASP
字号:
<!-- #include virtual="/admin/admin_head.asp" -->

<%
t_mode = request("mode")

if t_mode = "" then
	tmp_month = CStr(Month(Date()))
	tmp_day = CStr(Day(Date()))
	if (tmp_month = 5) and (tmp_day < 19) then
		t_mode = 1
	elseif (tmp_month = 5) and (tmp_day < 26) then
		t_mode = 2
	else
		t_mode = 3
	end if
end if

sql = "SELECT count(*) as counter "
sql = sql &  " FROM IB_Tournament "
if t_mode = "1" then sql = sql &  " WHERE t_time = 1 "
if t_mode = "2" then sql = sql &  " WHERE t_time = 2 "
if t_mode = "3" then sql = sql &  " WHERE t_time = 3 "
if t_mode = "complete" then sql = sql &  " WHERE t_complete = 'T' "
if t_mode = "solo" then sql = sql &  " WHERE t_buddyId = 'F'  "
if t_mode = "double" then sql = sql &  " WHERE t_buddyId != 'F' and t_complete = 'F'  "
set crs = DbCon.Execute(sql)

total = crs("counter")
%>

<script language="JavaScript">
<!--
	function popup(name, name2, w, h, s)
	{
	var pop_name = name;
	var win_name = name2;
	var w_value = w;
	var h_value = h;
	var scroll = s;
		window.open(pop_name,win_name,'toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=' + scroll +',resizable=no,width=' + w_value +',height=' + h_value +',left=11,top=5');
	}
// -->
</script>

<table width="750" border="0" cellspacing="1" cellpadding="1" align="center">
  <tr> 
	<td bgcolor="#CCCCCC" height="50">
	  <div align="center"><font size="5" face="蹈框"><b>航霸烙 配呈刚飘 (since 03/05/12)</b></font></div>
	</td>
  </tr>
</table><br>
<table border=0 width=750 cellpadding=0 cellspacing=0 align=center>
	<tr>
		<td colspan=2 class="boardtext03" align="center"><b><a href="tournament.asp?mode=1">[1瞒 抗急 府胶飘]</a>&nbsp;<a href="tournament.asp?mode=2">[2瞒 抗急 府胶飘]</a>&nbsp;<a href="tournament.asp?mode=3">[3瞒 抗急 府胶飘]</a><!-- <br><a href="tournament.asp?mode=complete">[评 备己 肯丰等 府胶飘]</a>&nbsp;<a href="tournament.asp?mode=solo">[去磊 脚没茄 府胶飘]</a>&nbsp;<a href="tournament.asp?mode=double">[评 脚没沁瘤父 肯丰 救等 府胶飘]</a> --></b></td>
	</tr>

<!-- <%if (day(date()) = 17) or (day(date()) = 23) or (day(date()) = 30) then%>
	<tr>
		<td colspan=2 class="boardtext03" align="center"><hr size="1"></td>
	</tr>
	<tr>
		<td colspan=2 class="boardtext03" align="center"><b><a href="tournament_ok.asp?type=1">[评 脚没沁瘤父 肯丰 救等 荤恩 去磊肺 父甸扁]</a>&nbsp;<a href="tournament_ok.asp?type=2">[评 备己 肯丰 矫虐扁!!!]</a>&nbsp;<a href="tournament_ok.asp?type=3">[措柳钎 楼扁!!!]</a></b></td>
	</tr>
	<tr>
		<td colspan=2 class="boardtext03" align="center"><hr size="1"></td>
	</tr>
<%end if%> -->

	<tr>
		<td colspan=2 class="boardtext03" align="right"><b><%=total%> 评</b></td>
	</tr>
	<tr>
		<td colspan=2 bgcolor="#3C57A2">
			<table border=0 width=750 cellpadding=0 cellspacing=1 class="boardtext03">
			<tr>
				<td width=50 bgcolor="skyblue" align=center height=20>评 锅龋</td>
				<td width=160 bgcolor="skyblue" align=center height=20>脚没磊 ID</td>
				<td width=170 bgcolor="skyblue" align=center height=20>脚没茄 朝楼</td>
				<td width=80 bgcolor="skyblue" align=center height=20>脚没磊 ID<br>啊涝荤捞飘</td>
				<td width=70 bgcolor="skyblue" align=center height=20>评 备己 蜡公</td>
				<td width=160 bgcolor="skyblue" align=center height=20>抗急 搬苞</td>
			</tr>
			
	<%
	sql = "SELECT * "
	sql = sql &  " FROM IB_Tournament "
	if t_mode = "1" then sql = sql &  " WHERE t_time = 1 "
	if t_mode = "2" then sql = sql &  " WHERE t_time = 2 "
	if t_mode = "3" then sql = sql &  " WHERE t_time = 3 "
	if t_mode = "complete" then sql = sql &  " WHERE t_complete = 'T' "
	if t_mode = "solo" then sql = sql &  " WHERE t_buddyId = 'F'  "
	if t_mode = "double" then sql = sql &  " WHERE t_buddyId != 'F' and t_complete = 'F'  "
	sql = sql &  " ORDER BY t_team asc "
	set ser_rs = DbCon.Execute(sql)

	if ser_rs.Eof OR ser_rs.Bof then 

	else 

	i=1

	DO UNTIL ser_rs.Eof OR ser_rs.Bof

		partner = ser_rs("t_partner")
		if partner = "BG" then partner = "<font color=blue>航霸烙</font>"
		if partner = "NM" then partner = "齿付喉"
		if partner = "BM" then partner = "<font color=blue>棍胶孤流</font>"
		if partner = "JC" then partner = "<font color=blue>炼捞揪匙</font>"
		if partner = "LH" then partner = "<font color=blue>扼弊窍烙</font>"
		if partner = "NT" then partner = "<font color=blue>匙捞飘</font>"

		t_team = ser_rs("t_team")
		idname = ser_rs("t_idname")

		buddyId = ser_rs("t_buddyId")
		if buddyId = "F" then buddyId = "绝澜"

		t_date = ser_rs("t_date")

		complete = ser_rs("t_complete")
		if complete = "T" then complete = "<font color=red><b>肯丰</b></font>"
		if complete = "F" then complete = "固肯丰"

		wincount = ser_rs("t_wincount")
		if wincount = 0 then
			wincount = "抗急 阂曼"
		elseif wincount = -99 then
			wincount = "<font color=red><b>抗急 呕遏</b></font>"
		else
			wincount = "<font color=blue><b>" & wincount & " 铰</b></font>"
		end if

		if i mod 20 >0 and i mod 20 <11 then 
			bgcolor = "#E6E6E6"
		else
			bgcolor = "#CCCCCC"
		end if
	%>
			<tr>
				<td width=50 bgcolor="<%=bgcolor%>" align=center height=20 ><%=t_team%></td>
				<td width=160 bgcolor="<%=bgcolor%>" align=center height=20><a href="javascript:popup('/admin/member/member_view.asp?user_id=<%=idname%>', 'member_view', 500, 700, 'no');"><%=idname%></a></td>
				<td width=170 bgcolor="<%=bgcolor%>" align=center height=20><%=t_date%></td>
				<td width=80 bgcolor="<%=bgcolor%>" align=center height=20 ><%=partner%></td>
				<td width=70 bgcolor="<%=bgcolor%>" align=center height=20><%=complete%></td>
				<td width=160 bgcolor="<%=bgcolor%>" align=center height=20><%=wincount%></td>
			</tr>
			
	<%
		if i mod 100 = 0 then 		
	%>
			<tr>
				<td colspan=7 bgcolor="white" align=center height=50  valign=middle><a href="/admin/event/event.asp"><font size="2"><b>捞亥飘 皋牢栏肺 操宽~~~!!!</b></font></a></td>
			</tr>

	<%	
		end if
	%>
	<%
		i=i+1
		ser_rs.MOVENEXT
	LOOP
	
	end if
	%>
		
		
			</table>
		</td>
	</tr>
</table>
<table width="650" border=0 align=center class="boardtext03"> 
<tr><td align="right"><br>
(^_^) 捞亥飘绰 拌加登绢具茄促~ 罗~~~~宽! 缺泼~!!</font><br><br>
<a href="/admin/event/event.asp"><font size="2"><b>捞亥飘 皋牢栏肺 操宽~~~!!!</b></font></a><br><br>
</td></tr></table>

<!-- #include virtual="/admin/admin_bottom.asp" -->

⌨️ 快捷键说明

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