deladmin.asp
来自「我的课程设计」· ASP 代码 · 共 23 行
ASP
23 行
<!-- #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 + =
减小字号Ctrl + -
显示快捷键?