?? delschool.asp
字號(hào):
<!--#include file = "inc/conn.asp" -->
<!--#include file = "CheckLogin.asp" -->
<!--#include file = "inc/zhuru.asp" -->
<%
Dim strID ,strUrl
strID = Request.QueryString("ID")
strUrl = "Index_School.asp?ID=" & strID
If strID &"" = "" Then
Response.Write("參數(shù)錯(cuò)誤!")
Response.End
End If
If Session("UserType") <> "管理員" Then
Response.Write("您沒有權(quán)限刪除此信息!")
Response.End
End If
Dim rs ,strSql
strSql = "DELETE FROM School WHERE ID = "& strID
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open strSql,conn,3,1
Response.Redirect(strUrl)
%>
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -