📄 del_admin_certain.asp

📁 oracle9i程序事例集

💻 ASP

字号:

<%@LANGUAGE="VBSCRIPT" %>
<!-- #include file="../common/conn.asp" -->
<!-- #include file="../common/status.html" -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>确认删除管理员</title>
<% if session("admin_id")<>"admin" then %>
  您还没有登录或者您的权限不够，五秒钟后自动返回登录，如果您的浏览器没有自动返回，请<a href="../admin/login.html">点击登录</a>。
  <meta http-equiv="refresh" content="5;url=login.html">
<% else %>
</head>

<body background="../img/adminbg.gif">
<%
  dim rs,sql
  set rs=server.CreateObject("adodb.recordset")
  sql="select admin_id, admin_remark from scott.admin where admin_id='"&request.QueryString("id")&"'"
  rs.open sql,connstr,3,3
%>
<div align="center"><center>
<table width="750" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td height="30" colspan="4" bgcolor="#FFFF00"><font color="#FF0000">您要删除的管理员帐号信息：</font></td>
    </tr>
  <tr>
    <td width="50%" height="30" align="right">管理员帐号：</td>
    <td width="50%" align="left"><%=rs("admin_id") %></td>
  </tr>
  <tr>
    <td height="30" align="right">备注：</td>
    <td align="left"><%=rs("admin_remark") %></td>
  </tr>
  <tr>
    <td height="30" align="right"><a href=del_admin_sav.asp?id=<%=request.QueryString("id")%>>确定删除</a>&nbsp;&nbsp;	</td>
	<td align="left">&nbsp;&nbsp;<a href='javascript:history.go(-1)'>返回上一页</a></td>
  </tr>
</table>
</center></div>
</body>
<%
  end if
  rs.close
  set rs=nothing
%>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -