areadelt.asp

来自「旅游在线报名的系统包括地域管理」· ASP 代码 · 共 39 行

ASP
39
字号
<!--#include file="../conndb.asp"-->
<!--#include file="isAdmin.asp"-->
<html>
<head>
<title>地域管理</title>
<link href=../style.css rel=STYLESHEET type=text/css>
</head>
<body>
<%
  '从数据库中批量删除地域信息
  Dim id,sql
  id = Request.QueryString("id")
  Dim Rs
  Set Rs = Server.CreateObject("ADODB.RecordSet")
  '如果存在此地域的线路则不允许删除
  sql = "Select * From Line Where AreaId In(" & id & ")"
  Set Rs = Conn.Execute(sql)
  If Rs.EOF Then
    sql = "Delete From Area Where AreaId In(" & id & ")"
    Conn.Execute(sql)
    Response.Redirect("AreaMng.asp")
  Else
    Response.Wriet "<h2>这些地域中还有旅游线路,不能删除!</h2>"
  End IF
%>
</form>
</body>
</html>










⌨️ 快捷键说明

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