📄 admin_articlelist.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="Admin_Check.asp"-->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>文章管理</title>
<style type="text/css">
<!--
body {
margin-left: 0px;
margin-top: 0px;
margin-right: 0px;
margin-bottom: 0px;
}
-->
</style>
<link href="Style.css" rel="stylesheet" type="text/css">
<%
'删除文章
if request("action") = "delete" then
call connexec("delete from Article where ContentID=" & request("ContentID"))
end if
%>
</head>
<body>
<table width="613" border="0" cellpadding="0" cellspacing="0">
<!--DWLayoutTable-->
<tr>
<td width="613" height="29" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<!--DWLayoutTable-->
<tr>
<td width="613" height="29" align="center" valign="middle"><div align="center"><strong>文章列表</strong></div></td>
</tr>
</table></td>
</tr>
<tr>
<td height="164" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<!--DWLayoutTable-->
<tr>
<td width="29" height="8"></td>
<td width="543"></td>
<td width="41"></td>
</tr>
<tr>
<td height="156"></td>
<td valign="top">
<table width="100%" border="0" cellpadding="2" cellspacing="1" bgcolor="#C0E096">
<!--DWLayoutTable-->
<tr valign="middle" bgcolor="#F3F9EC">
<td width="55" height="22"><div align="center"><strong>编号</strong></div></td>
<td width="259"><div align="center"><strong>文章标题</strong></div></td>
<td width="101"><div align="center"><strong>日期</strong></div></td>
<td colspan="2"><div align="center"><strong>操作</strong></div></td>
</tr>
<%
'取出用户所有文章，并分页显示
call creaters(rs,"select * from Article where username='" & request.Cookies("user")("username") & "' order by ContentID desc")
Page = Clng(Request("Page"))
rs.pagesize = 7
if Page < 1 then Page = 1
if Page > rs.PageCount then
Page = rs.PageCount
end if
if not rs.eof and not rs.bof then rs.absolutepage = Page
for i = 1 to rs.pagesize
if rs.eof then exit for
%>
<tr valign="middle" bgcolor="#FFFFFF">
<td height="23"><div align="center"><%= rs("ContentID") %></div></td>
<td><%= rs("Title") %></td>
<td><%= rs("date") %></td>
<!--修改-->
<td width="51"><div align="center"><a href="Admin_AddArticle.asp?action=alter&Contentid=<%= rs("ContentID") %>">修改</a></div></td>
<!--删除-->
<td width="51"><div align="center"><a href="javascript:if(confirm('确实要删除么?'))location='Admin_ArticleList.asp?action=delete&Contentid=<%= rs("ContentID") %>'">删除</a></div></td>
</tr>
<%
rs.movenext
next
%>
<tr valign="middle" bgcolor="#F3F9EC">
<td height="23" colspan="5">
<div align="right">当前第 <%= page %> 页
<%
for i = 1 to rs.PageCount
response.Write(" <a href='Admin_ArticleList.asp?Page=" & i & "'>[" & i & "]</a> ")
next
call closers(rs)
%>
</div></td>
</tr>
</table></td>
<td></td>
</tr>
</table></td>
</tr>
<tr>
<td height="12"></td>
</tr>
</table>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -