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

📄 down_check.asp

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

<SCRIPT LANGUAGE="JavaScript">
<!--
function WM_imageSwap(daImage, daSrc)
{
	var objStr,obj;
	if(document.images){
	// Check to see whether you are using a name, number, or object
		if (typeof(daImage) == 'string')
		{
		// This whole objStr nonesense is here solely to gain compatability
		// with ie3 for the mac.
			objStr = 'document.' + daImage;
			obj = eval(objStr);
			obj.src = daSrc;
		}
		else if ((typeof(daImage) == 'object') && daImage && daImage.src)
		{
			daImage.src = daSrc;
		}
	}
}
// Trim 窃荐
function trim(str)
{
	var trimstr = str;
	for (var i=0; i< str.length;i++)
	{
		trimstr = trimstr.replace(' ' ,'');
	}
	return trimstr;
}		
// 其捞瘤 捞悼窃荐
function go_page(page)
{
	thisform=document.frmList
	//thisform.reset();
	frmList.page.value=page;
	frmList.action="down_check.asp?sort=<%=request("sort")%>"
	frmList.submit();
}
//-->
</SCRIPT>
<%
'*********************************************************************
If Request("page")="" Then
	Page=1
Else
	Page=Request("page")
End If

if request("sort")="" then
	sort=0
else
	sort = request("sort")
end if
'*********************************************************************	


SQL="EXEC usp_gamedownchk_nologin_list_01s "
SQL=SQL + " @Page=" & Cstr(page)  
SQL=SQL + ", @sort=" & Cstr(sort)
Set Rs = DbCon.Execute(SQL)

If Not (Rs.Eof OR Rs.Bof) Then
	TotalPage=Rs("TotalPage")
	PreviousPage=Rs("PreviousPage")
	NextPage=Rs("NextPage")
	CurrentRecord=Rs("CurrentRecord")
	RecordCount=Rs("RecordCount")
Else
	TotalPage=0
	PreviousPage=0
	NextPage=0
	CurrentRecord=0
	RecordCount=0
End If	


'=========================================================
If Not (rs.Eof OR rs.Bof) Then
	Rs.Move 50 - Cint(CurrentRecord)
	Dim IndexCount
	IndexCount=(page*50+1)-50
	%> 

	<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>航霸烙 促款肺靛 泅炔 炼雀</b></font></div>
		</td>
	  </tr>
	</table><br>

	<form name="frmList" method="post">	
	<input type="hidden" name="page" value="<%=Page%>">
	<table width="750" border="0" cellspacing="0" cellpadding="0" align="center">
		<tr> 
			<td  height="26"> 
				<table width="500" border="0" cellspacing="0" cellpadding="0" height="26" class="boardtext03">
					<tr> 
						<td width="30">&nbsp;</td>
						<td>促款 罐篮 IP 荐:<%=RecordCount%> IP 泅犁<%=page%>/<%=TotalPage%>其捞瘤</td>
					</tr>
				</table>
			</td>
		</tr>
		<tr> 
			<td height="25" align="center"> 
				<table width="740" border="0" cellspacing="1" cellpadding="2" class="boardtext03">
					<tr bgcolor="#FFCC00"> 
						<td width="200" height="30" align="center"><b><a href="down_check.asp?sort=1">IP鉴栏肺 沥纺</a></b></td>
						<td width="340" height="30" align="center"> <b><a href="down_check.asp?sort=2">弥辟 促款罐篮 矫阿鉴栏肺 沥纺</a></b></td>
						<td width="200" height="30" align="center"><b><a href="down_check.asp?sort=3">促款 罐篮 冉荐肺 沥纺</a></b></td>
					</tr>

					<%
					DO UNTIL rs.Eof OR rs.Bof
						idx = rs("idx")
						User_IP = rs("UserIP")
						lastdowntime = rs("lastdowntime")
						downcount = rs("downcount")
						%>

						<tr bgcolor="#CCCCCC" height="25"> 
							<td align="center"<%if sort = 1 then%> bgcolor="skyblue"<%end if%>><%=User_IP%></td>
							<td align="center"<%if sort = 2 then%> bgcolor="skyblue"<%end if%>><%=lastdowntime%></a></td>
							<td align="center"<%if sort = 3 then%> bgcolor="skyblue"<%end if%>><%=downcount%></a></td>
						</tr>

						<%
						IndexCount=IndexCount+1
						rs.MOVENEXT
					LOOP
					%>

					<tr bgcolor="#CCCCCC">
						<td colspan=7 align=center>
						<br>

						<% 	
						Blockpage=Int((Page-1)/10)*10 + 1
						If Blockpage = 1 Then
						%> 
						<%		
						Else
						%>
							<a href="javascript:go_page('1')">1Page</a>
							<a href="javascript:go_page('<%=blockPage-10%>')">⑿</a>
						<%
						End If

						Count=1
						Do Until (Count > 10 Or Blockpage > Cint(TotalPage))
							If Blockpage=Cint(Page) Then
							%>
								&nbsp;[<font class=blue><%=Blockpage%></font>]&nbsp;
							<%
							Else
							%> 
								&nbsp;<a href="javascript:go_page('<%=Blockpage%>')"><%=Blockpage%></a>&nbsp;
							<%
							End If
							Blockpage=Blockpage+1
							Count = Count + 1	
						Loop

						If Blockpage > Cint(TotalPage) Then
						%> 
						<%				
						Else
						%> 
							<a href="javascript:go_page('<%=Blockpage%>')">⒀</a> 
							<a href="javascript:go_page('<%=TotalPage%>')">	Last page</a>
						<%
						End If
						Set Conn	=	Nothing
						%>

						</form>
						</td>
					</tr>
				</table>
			</td>
		</tr>
	</table>

<%
else%>

	鞠帛滴 矿栋咯~~~!!!

<%
end if%>

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

⌨️ 快捷键说明

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