📄 deladmin.asp

📁 我的课程设计

💻 ASP

字号:

<!-- #include file="conn.asp" -->
<%
	'if  (session("userright")<>"1") then 
'		response.Redirect("../../error.asp?err_on=5")
'	end if
%>
<body bgcolor="#799ae1">
<%
	Dim Aid,strSQL,rs
	Aid=request.QueryString("aid")	
	strSQL="delete from admin where id="&Aid
	db.execute(strSQL)

	
%>
<table width="75%" height="89" border="1" bordercolor="#FFFFFF" >
  <tr>
    <td height="62"> 
	  <%response.Write("<font size=2 color=#FFFFFF>已经成功删除，两秒钟后自动返回...</font><meta http-equiv='refresh' content='2;url=addadmin.asp'>")%>
    </td>
  </tr>
</table>
</body>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -