deleterec.asp

来自「本同学录系统演示地址: http://class.19870123.cn/ 」· ASP 代码 · 共 27 行

ASP
27
字号
<!-- #include file="ChkPwd.asp" -->
<html>
<head>
<title>保存用户信息</title>
</head>
<body>
<%
  '定义变量
  Dim sql, vContId
  '从参数中接收数据到变量中
  vContId = CLng(Request("ContId"))
  
  'Server对象的CreateObject方法建立Connection对象
  Set Conn=Server.CreateObject("ADODB.Connection")
  Conn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("book.mdb")
  Conn.Open
  
  sql = "DELETE FROM Content WHERE ContId=" & vContId & " Or UpperId=" & vContId
  Conn.Execute(sql)
%>
<Script Language="JavaScript">
  //打开此脚本的网页将被刷新
  opener.location.reload();
  //停留800毫秒后关闭窗口
  setTimeout("window.close()",800);
</Script>
</html>

⌨️ 快捷键说明

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