admin_del.asp

来自「1. 在界面的开头显示新闻添加的位置」· ASP 代码 · 共 85 行

<% response.buffer=true %>
<!--#include file="conn.asp"-->
<% 
dim rs,strsql,title,date1
set rs=Server.CreateObject("ADODB.recordset")
rs.open "select * from article order by articleid desc",conn
if session("admin")<>"" then 
%>
<!--#include file="head.asp"-->
<br>
<table width="779" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="##0066CC">
  <tr>
    <td width="180"align="left" valign="top" scope="row">　
      <table width="100%" height="100%" border="0">
        <tr><td align="center" valign="top" scope="row"></tr>
		<tr><td align="center" valign="top" scope="row"><!--#include file="hot.asp"--></tr>
		<tr><td align="center" valign="top" scope="row"><!--#include file="tuijian.asp"--></td></tr>
	  </table>
		
    </td>
	
    <td width="490" align="center" valign="top">
	<table width="100%" align="center" cellpadding="0" cellspacing="0">
    
		<tr><td>
		<table>
		<tr><td>
		修改文章
		</td>
		</tr>
		<%
	  while not rs.eof
	  %>
      <tr><td align="left" valign="top">
	 ◆<a href="sort1.asp?articleid=<%=rs("articleid")%>"> <font color="cccccc"><%=rs("title")%>(<%=rs("date")%>)</font></a>&nbsp;&nbsp;<a href="admin_del_proc.asp?articleid=<%=rs("articleid")%>">删除</a>
	 <br><br>
		<%
	  rs.movenext
	  wend
	  %>  
		</table>
		</td></tr>
    </table></td>
	<td width="120"align="left" valign="top" scope="row">　
      <table width="100%" height="100%" border="0">
        <tr><td align="center" valign="top" scope="row"><table><tr>
          <td align="center" valign="top" scope="row"><b>密码修改</b><br></td></td>
        </tr>
		<tr>
		<td>
		<form action="password.asp?user=<%=name1%>" method="post">
		<p>原密码：<p><input name="password1" size="10" type="password">
		<p>新密码：<p><input name="password2" size="10" type="password">
		<p>新密码：<p><input name="password3" size="10" type="password">
		<p><input type="submit" value="确定">
				</form>
		</td>
		</tr><tr>
		<td><a href="admin.asp">管理首页</a>
		<p><a href="admin_del.asp">删除</a>
		</td>
		</tr>
		
		
       </table>
	   </td>
	   </tr>
	  </table>
		
    </td>
  </tr>
</table>
  <p align="center">Copyright (C) 2004 Tie8.Studio All Rights Reserved </p>
    <p align="center">版权所有 铁吧</p>
		<%
	elseif name1=pass("admin") and password=pass("password") then
	  session("admin")=pass("admin")
	  response.redirect "admin.asp"
	else
	%>
	请输入正确的用户名和密码。点击<a href="index.asp">返回</a>
	<%end if
	%>
</body>
</html>