userdelt.asp

来自「这是一个图书管理系统,也许能给大家一些帮助」· ASP 代码 · 共 24 行

ASP
24
字号
<!-- #include file="ChkPwd.asp" -->
<!-- #include file="IsAdmin.asp" -->
<html>
<head>
<title>删除用户信息</title>
</head>
<body>
<%
  Dim uid
  '读取UserId参数
  uid = Request.QueryString("UserId")
  'Server对象的CreateObject方法建立Connection对象
  Set Conn=Server.CreateObject("ADODB.Connection")
  Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("Database/discuss.mdb")
  '执行DELETE语句,删除指定用户
  Conn.Execute("DELETE FROM Users WHERE UserId=" & uid )
  Response.Write "<h2>成功删除</h2>"
%>
</body>
<script language="javascript">
  opener.location.reload();
  setTimeout("window.close()",1600);
</script>
</html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?