📄 nook.asp
字号:
<!--#include file="const.asp"-->
<!--#include file="articleconn.asp"-->
<html>
<%username=request.querystring("username")
page=request.querystring("page")
Set rs = Server.CreateObject("ADODB.Recordset")
username=session("UserName")
passwd=session("Passwd")
sql="select * from admin where username='"&UserName&"'and passwd='"&Passwd&"'"
rs.open sql,conn,3,3
if rs.eof then
key=rs("oskey")
response.redirect "login.asp"
response.end
end if
%>
<head>
<title>尚未审核稿件</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style>
<!--
a:link { text-decoration: underline; color: #000000; font-family: 宋体 }
a:visited { text-decoration: underline; color: #000000; font-family: 宋体 }
a:hover { text-decoration: underline; color: #cc0000 }
body {font-family: "宋体"; font-size: 9pt;line-height: 12pt;}
table {font-family: "宋体"; font-size: 9pt;line-height: 12pt;}
-->
</style>
</head>
<body bgcolor="#C0C0C0" text="#000000">
<TABLE cellSpacing=0 cellPadding=0 width="90%" align=center border=0>
<TBODY>
<tr align="center">
<td colSpan=5 height="25"><font color="#FF0000">以下是你等待发表，你可以修改或者删除它。
但已经发表的文章除外。</font></td>
</tr>
<TR class=lanmu>
<TD width=35% height=24>
<P><B>作 品 标 题</B></P>
</TD>
<TD align=middle width=15%>
<DIV align=center><B>所在栏目</B></DIV>
</TD>
<TD align=middle width=15%>
<DIV align=center><B>日期</B></DIV>
</TD>
<TD align=middle width=15%>
<P align=center><B>状态</B></P>
</TD>
<TD align=middle width=20%>
<P align=center><B>操作</B></P>
</TD>
</TR>
<TR>
<TD background=images/line.gif colSpan=5
height=1></TD>
</TR>
<%
mmm=request("mmm")
if mmm="" then mmm=0
ttt=request("ttt")
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from shenhe where shenghe<>'已审' and username='"&session("username")&"' order by newsid desc"
rs.open sql,conn,1,1%>
<% i=0 %>
<%
if mmm<>0 then
for iisf=1 to mmm *10
if rs.eof then exit for
rs.movenext
next
end if
do while not rs.eof %>
<TR>
<TD width=35%><%=rs("title")%></TD>
<TD align=middle width=15%><%=rs("type")%></TD>
<TD align=middle width=15%><%=rs("dateandtime")%></TD>
<TD align=middle width=15%><%=rs("shenghe")%></TD>
<TD align=center width=15%><a href="edit.asp?id=<%=rs("newsid")%>">修改</a>
<a href="dele.asp?id=<%=rs("newsid")%>">删除</a></TD>
</TR>
<TR>
<TD background=images/line.gif colSpan=5
height=1></TD>
</TR>
<% i=i+1
rs.movenext
if i=10 then exit do
loop
%>
</TBODY></TABLE>
<TABLE cellSpacing=2 cellPadding=2 width="90%"
border=0 align=center>
<TBODY>
<TR>
<TD>第 <%=mmm+1%> 页
<%if mmm<>0 then%>
<%="<a href=userlogin.asp?mmm=" & mmm-1 & ">上页</a>"%>
<%end if%>
<%if not rs.eof then%>
<%="<a href=userlogin.asp?mmm=" & mmm+1 & ">下页</a>"%>
<%end if%>
</TD>
</TR></TBODY></TABLE>
<% rs.close
set rs=nothing
conn.close
set conn=nothing%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -