📄 modifynews1.asp

📁 后台路径:admin/login.asp 用户名:manage 密码:fansyou
💻 ASP
字号:
<% if request.cookies("okadmin")="" and request.cookies("rank")="" then
  response.redirect "login.asp"
end if %>
<!--#include file=conn.asp -->

<%  
response.Expires=0
ppp=15 '每页显示的条数%>
<html>
<SCRIPT language=Javascript>
function confirmdel(id,title)
{
	if(confirm("您确定要删除《"+title+"》吗?")==true)
	{
	window.location = "delnews3.asp?newsid="+id;
	}
}
</script>
<head>
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href=site.css rel=stylesheet>
</head>

<body>
<table border="0" width="100%" align=center>
  <tr>
    <td width="100%"><strong> &nbsp;&nbsp;新闻管理</strong></td>

  </tr>
   <tr>
    <td width="100%"></td>
  </tr>
  <tr>
    <td width="100%">
      <hr size="1">
    </td>
  </tr>
    <tr>
           
    <td width="100%"> 
      <%
set rs=server.CreateObject("ADODB.RecordSet")
 
rs.Source="select * from News order by NewsID desc"
 
rs.Open rs.Source,conn,1,1
if rs.eof or rs.bof then 
response.write "该类别暂无文章！"
else
if request.querystring("page")="" then
  				curpage = 1
            else
				curpage = cint(request.querystring("page"))
            end if
			rs.pagesize=18 '每页显示5条新闻
			i=1
			rs.absolutepage = curpage
			pagecount=curpage
 if rs.eof or rs.bof then 
response.Write("<div align=center><h3>该类别暂无文章！</h3></div>")
else%>
      <table width="522" border="0" cellspacing="2" cellpadding="0">
        <tr> 
          <td  width="44" bgcolor="#31659c"><div align="center"><strong><font color="#FFFFFF">ID</font></strong></div></td>
          <td width="293" bgcolor="#31659c"><div align="center"><strong><font color="#FFFFFF">标题</font></strong></div></td>
          <td width="75" bgcolor="#31659c"><div align="center"><strong><font color="#FFFFFF">所属小类</font></strong></div></td>
          <td colspan="2" bgcolor="#31659c"><div align="center"><strong><font color="#FFFFFF">相关操作</font></strong></div></td>
        </tr>
        <%do while not rs.eof %>
        <tr height="26"> 
          <td align="center"><%=rs("newsid")%>&nbsp;</td>
          <td><%=rs("title")%>&nbsp;</td>
          <td align="center"><%=rs("smallclassname")%>&nbsp; </td>
          <td width="39" align="center"  > <a href="modifynews2.asp?id=<%=rs("newsid")%>">修改 
            </a></td>
          <td width="38" align="center"  > <a href="javascript:confirmdel('<%=rs("newsid")%>','<%=rs("title")%>')">删除</a> </td>
        </tr>
        <%
		i=i+1
		if i > rs.pagesize then exit do
		rs.movenext
		loop
		'begin222******************
      filename="modifynews1.asp?bigclass="&bigclassname&"&"
	 response.Write("<tr><td colspan=6 align=center><HR SIZE=0 width='90%'>")
	 if PageCount=1 then                   
response.write "<font color='#000064'>首页 上页</font>&nbsp;"                   
else                   
response.write "<a href="&filename&"page=1><font color='0000BE'>首页</font></a>&nbsp;"                   
response.write "<a href="&filename&"page="&(pagecount-1)&"><font color='0000BE'>上页</font></a>&nbsp;"        
end if        
if rs.PageCount-pagecount<1 then                   
response.write "<font color='#000064'>下页 尾页</font>"                   
else                   
response.write "<a href="&filename&"page="&(pagecount+1)&"><font color='0000BE'>下页</font></a>&nbsp;"             
response.write "<a href="&filename&"page="&rs.PageCount&"><font color='0000BE'>尾页</font></a>"                  
end if                   

response.write "<font color='000064'>&nbsp;页次:<font color=blue>"&pagecount&"</font>/"&rs.PageCount&"页</font> "  
response.Write "<HR SIZE=0 width='90%'></td></tr>"
			
	 'end 222********************* 
		end if
		end if
		rs.close
		set rs=nothing
		conn.close
		set conn=nothing
		%>
      </table> </td>
  </tr></table></body></html>
⌨️ 快捷键说明

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