📄 flasher_list.asp
字号:
<!--#include file="Conn.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>佰萬娱乐地带.::::.::..动漫闪吧 - 闪客阵线</title>
<link rel="stylesheet" href="Inc/Css.css" type="text/css">
</head>
<body topmargin="0" leftmargin="0" background="Image/Channel_Bground.gif">
<!--#include file="Top.asp"-->
<table border="0" width="770" cellspacing="0" cellpadding="0">
<tr>
<td colspan="2" width="180"><img border="0" src="Image/I_XS_A.gif"></td>
<td rowspan="2" width="590"><img border="0" src="Image/I_XS_D.gif"></td>
</tr>
<tr>
<td width="5"><img border="0" src="Image/I_XS_B.gif"></td>
<td width="175"><img border="0" src="Image/Search_175.gif"></td>
</tr>
</table>
<table border="0" width="770" cellspacing="0" cellpadding="0">
<tr>
<td><img border="0" src="Image/Space_5.gif"></td>
<td width="175" valign="top">
<table border="0" width="175" cellspacing="0" cellpadding="0">
<tr>
<td background="Image/Left_Bg_175.gif" align="center">
<table border="0" width="157" cellspacing="0" cellpadding="0">
<tr>
<td><!--#include file="D_Search.asp"--></td>
</tr>
<tr>
<td><img border="0" src="Image/Icon_Hot.gif"></td>
</tr>
<tr>
<td><!--#include file="D_Flash_Hot.asp"--></td>
</tr>
<tr>
<td><img border="0" src="Image/Special_175.gif"></td>
</tr>
<tr>
<td><!--#include file="D_Special_Tui.asp"--></td>
</tr>
<tr>
<td><img border="0" src="Image/Tui_175.gif"></td>
</tr>
<tr>
<td><!--#include file="D_Flash_Tui.asp"--></td>
</tr>
</table>
</td>
</tr>
<tr>
<td><img border="0" src="Image/Left_Down_175.gif"></td>
</tr>
</table>
</td>
<td width="590" valign="top" align="center">
<table border="0" width="570" cellspacing="0" cellpadding="0">
<tr>
<td height="25"><font color="#999999"><b>您的位置：</b>佰萬娱乐城
>>> <a href="Index.Asp"><font color="#999999">动漫闪吧</font></a> >>> 闪客阵线</font></td>
</tr>
<tr>
<td><img border="0" src="Image/Flasher_List_570.gif"></td>
</tr>
<tr>
<td align="center" background="Image/Flasher_Bg_570.gif">
<table border="0" cellspacing="0" cellpadding="5">
<%
FlasherType=request("FlasherType")
If FlasherType<>"" then
sql="select * from Flasher where FlasherType='"&FlasherType&"' order by FlasherID desc"
else
sql="select * from Flasher order by FlasherID desc"
end if
'response.write sql
set rs=server.createobject("ADODB.Recordset")
rs.open sql,conn,1,3
n=0
'预留分页显示功能
if not isempty(request("page")) then
pagecount=cint(request("page"))
else
pagecount=1
end if
rs.pagesize=12
rs.AbsolutePage=pagecount
do while not rs.eof
%>
<tr>
<td width="33%" align="center">
<table border="0" cellspacing="0" cellpadding="5">
<tr>
<td width="50%">
<table border="0" bgcolor="#E1E1E1" cellspacing="1" cellpadding="0">
<tr>
<td width="100%">
<table cellSpacing="1" cellPadding="0" width="100%" bgColor="#d7d7d7" border="0">
<tr>
<td width="100%">
<table cellSpacing="1" cellPadding="0" width="100%" bgColor="#b2b2b2" border="0">
<tr>
<td width="100%">
<table cellSpacing="0" cellPadding="5" width="100%" border="0">
<tr>
<td width="100%" bgColor="#ffffff">
<table cellSpacing="0" border="0">
<tr>
<td width="100%" bgColor="#666666"><a href="Show_Flasher.Asp?FlasherID=<%=rs("FlasherID")%>&Flasher=<%=rs("Flasher")%>"><img border="0" src="FlasherPic/<%=rs("FlasherPic")%>" width="140" height="180" alt="查看<%=rs("Flasher")%>的详细资料"></a></td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td align="center"><a href="Show_Flasher.Asp?FlasherID=<%=rs("FlasherID")%>&Flasher=<%=rs("Flasher")%>"><font color="#808000"><b><%=rs("Flasher")%></b></font></a></td>
</tr>
</table>
</td>
<%
rs.movenext
if rs.eof or rs.bof then
response.write "<td width='33%'></td><td width='34%'></td>"
exit do
else
n=n+1
end if
%>
<td width="33%" align="center">
<table border="0" cellspacing="0" cellpadding="5">
<tr>
<td width="50%">
<table border="0" bgcolor="#E1E1E1" cellspacing="1" cellpadding="0">
<tr>
<td width="100%">
<table cellSpacing="1" cellPadding="0" width="100%" bgColor="#d7d7d7" border="0">
<tr>
<td width="100%">
<table cellSpacing="1" cellPadding="0" width="100%" bgColor="#b2b2b2" border="0">
<tr>
<td width="100%">
<table cellSpacing="0" cellPadding="5" width="100%" border="0">
<tr>
<td width="100%" bgColor="#ffffff">
<table cellSpacing="0" border="0">
<tr>
<td width="100%" bgColor="#666666"><a href="Show_Flasher.Asp?FlasherID=<%=rs("FlasherID")%>&Flasher=<%=rs("Flasher")%>"><img border="0" src="FlasherPic/<%=rs("FlasherPic")%>" width="140" height="180" alt="查看<%=rs("Flasher")%>的详细资料"></a></td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td align="center"><a href="Show_Flasher.Asp?FlasherID=<%=rs("FlasherID")%>&Flasher=<%=rs("Flasher")%>"><font color="#808000"><b><%=rs("Flasher")%></b></font></a></td>
</tr>
</table>
</td>
<%
rs.movenext
if rs.eof or rs.bof then
response.write "<td width='34%'></td>"
exit do
else
n=n+1
end if
%>
<td width="34%" align="center">
<table border="0" cellspacing="0" cellpadding="5">
<tr>
<td width="50%">
<table border="0" bgcolor="#E1E1E1" cellspacing="1" cellpadding="0">
<tr>
<td width="100%">
<table cellSpacing="1" cellPadding="0" width="100%" bgColor="#d7d7d7" border="0">
<tr>
<td width="100%">
<table cellSpacing="1" cellPadding="0" width="100%" bgColor="#b2b2b2" border="0">
<tr>
<td width="100%">
<table cellSpacing="0" cellPadding="5" width="100%" border="0">
<tr>
<td width="100%" bgColor="#ffffff">
<table cellSpacing="0" border="0">
<tr>
<td width="100%" bgColor="#666666"><a href="Show_Flasher.Asp?FlasherID=<%=rs("FlasherID")%>&Flasher=<%=rs("Flasher")%>"><img border="0" src="FlasherPic/<%=rs("FlasherPic")%>" width="140" height="180" alt="查看<%=rs("Flasher")%>的详细资料"></a></td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td align="center"><a href="Show_Flasher.Asp?FlasherID=<%=rs("FlasherID")%>&Flasher=<%=rs("Flasher")%>"><font color="#808000"><b><%=rs("Flasher")%></b></font></a></td>
</tr>
</table>
</td>
</tr>
<%
rs.movenext
n=n+1
if n>=rs.pagesize then exit do
loop
%>
</table>
</td>
</tr>
<tr>
<td><img border="0" src="Image/Flasher_Down_570.gif"></td>
</tr>
<form action="Flasher_List.asp" method="post">
<tr>
<td align="center" style="padding-top:10px" height="50" background="Image/Page_Flasher_Bg_570.gif">共 <b><%=rs.recordcount%></b> 位闪客 页次: <b><font color=red><%=pagecount%></font>/<%=rs.pagecount%></b>,
当前从第 <%
if pagecount<=1 then
response.write "<font color=red>1</font>"
else
response.write "<font color=red>" & pagecount*rs.pagesize-rs.pagesize+1 & "</font>"
end if
%> 位开始。 <% if pagecount=1 and rs.pagecount<>pagecount and rs.pagecount<>0 then%>
<a href="Flasher_List.asp?FlasherType=<%=FlasherType%>&page=<%=cstr(pagecount+1)%>">下一页</a>
<% end if %> <% if rs.pagecount>1 and rs.pagecount=pagecount then %>
<a href="Flasher_List.asp?FlasherType=<%=FlasherType%>&page=<%=cstr(pagecount-1)%>">
上一页</a> <%end if%> <% if pagecount<>1 and rs.pagecount<>pagecount then%>
<a href="Flasher_List.asp?FlasherType=<%=FlasherType%>&page=<%=cstr(pagecount-1)%>">
上一页</a> <a href="Flasher_List.asp?FlasherType=<%=FlasherType%>&page=<%=cstr(pagecount+1)%>">
下一页</a> <% end if%> 跳转到
<select name="page">
<%for i=1 to rs.pagecount%>
<%
iselected=""
if i=pagecount then iselected="selected"
%>
<option value="<%=i%>" <%=iselected%>><%=i%></option>
<%next%>
</select> 页 <input type="hidden" name="FlasherType" value="<%=FlasherType%>"><input border=0 onFocus=if(this.blur)this.blur() name=go src="Image/B_Go.gif" type=image align="absmiddle" alt="点击提交"></td>
</tr>
</Form>
<%
rs.close
set rs=nothing
%>
<tr>
<td align="center" height="10"></td>
</tr>
</table>
</td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -