www.gusucode.com > 水族产品用品经营类企业网站asp源代码程序 > admin/admin_text_list.asp
<!--#INCLUDE VIRTUAL="/comm.asp"-->
<%
if session("admin")="" then
response.Redirect("admin_login.asp")
end if
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("/db/db.mdb")
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select id,title,sort1,sort2 from content Order By ID DESC"
rs.open sql,conn,3,2
if rs.eof then response.Redirect("admin_news_add.asp")
page1=cint(request("page"))'要求显示的页数
if page1=0 then page1=1
rows=15 '每页显示记录数
allcount=rs.recordcount '记录总数
'变量page2为最后得到的页数
if allcount/rows=int(allcount/rows) then
page2=allcount/rows
else
page2=int(allcount/rows)+1
end if
'判断是否超出最大页数
if page1>page2 then page1=page2
'移动指针到指定位置
if not rs.eof then rs.move (page1-1)*rows
%>
<link href="../css.css" rel="stylesheet" type="text/css">
<body background="../image/admin_bj.gif"><table border="0" cellpadding="6" cellspacing="2" class="ww5">
<tr align="center" bgcolor="#CCCCCC" class="w5">
<td>id</td>
<td width="380">标题</td>
<td nowrap>分类</td>
<td nowrap>修改</td>
<td nowrap>删除</td>
</tr>
<%
for i=1 to rows
%>
<tr align="center" bgcolor="#E2E2E2">
<td><a href="/text.asp?id=<%=rs("id") %>" target="_blank"><%=rs("id") %></a></td>
<td align="left"><%=rs("title") %></td>
<td align="left" nowrap><%=sz_sort1(rs("sort1")) %>><%=sz_sort2(rs("sort1"),rs("sort2")) %></td>
<td><a href="admin_news_edit.asp?id=<%=rs("id") %>">修改</a></td>
<td><a href="admin_news_edit_del.asp?id=<%=rs("id") %>">删除</a></td>
</tr>
<%
rs.movenext
if rs.eof then exit for
next
%>
<tr align="center" class="w5">
<td colspan="5"><input name="page1" type="hidden" id="page1" value="<%=page1 %>">
<input name="page2" type="hidden" id="page2" value="<%=page2 %>">
<a href="admin_text_list.asp?page=1"><img src="../image/first.gif" width="7" height="6" border="0" align="middle"></a>
<script language="JavaScript" type="text/JavaScript">
mypage1=page1.value;
mypage2=page2.value;
if(mypage1!=1){document.write("<a href='admin_text_list.asp?page="+(mypage1-1)+"'><img src='../image/back.gif' width='6' height='6' border='0' align='middle'></a> ");}
if(mypage2<11){
for(i=1;i<=mypage2;i++){
if(i==mypage1){
document.write("<span class='page_curpage'>"+i+"</span> ");
}else{
document.write("<a href='admin_text_list.asp?page="+i+"' class='page_num'>"+i+"</a> ");
}
}
}else{
if(mypage1<6){
for(i=1;i<11;i++){
if(i==mypage1){
document.write("<span class='page_curpage'>"+i+"</span> ");
}else{
document.write("<a href='admin_text_list.asp?page="+i+"' class='page_num'>"+i+"</a> ");
}
}
document.write("...");
}
if(mypage1>mypage2-5){
document.write("...");
for(i=mypage2-9;i<=mypage2;i++){
if(i==mypage1){
document.write("<span class='page_curpage'>"+i+"</span> ");
}else{
document.write("<a href='admin_text_list.asp?page="+i+"' class='page_num'>"+i+"</a> ");
}
}
}
if(mypage1>=6 && mypage1<=mypage2-5){
document.write("...");
for(i=mypage1-4;i<=mypage1-1+6;i++){
if(i==mypage1){
document.write("<span class='page_curpage'>"+i+"</span> ");
}else{
document.write("<a href='admin_text_list.asp?page="+i+"' class='page_num'>"+i+"</a> ");
}
}
document.write("...");
}
}
if(mypage1!=mypage2){document.write(" <a href='admin_text_list.asp?page="+(mypage1-1+2)+"'><img src='../image/next.gif' width='6' height='6' border='0' align='middle'></a>");}
</script>
<a href="admin_text_list.asp?page=<%=page2 %>"><img src="../image/last.gif" width="7" height="6" border="0" align="middle"></a></td>
</tr>
</table>