delmanager.asp

来自「一个企业管理ASP源码.增加了一些新的功能.」· ASP 代码 · 共 12 行

<%@ LANGUAGE="VBScript" %>
<!--#include file="conn.asp"-->
<!--#include file="basedsoftadmin.asp"-->
<%
dim SQL, Rs,ID
ID=request("ID")
set rs=server.createobject("adodb.recordset")
sqltext="delete from admin where Id="& ID
rs.open sqltext,conn,3,3
set rs=nothing
response.redirect "Manage_Admin.asp"
%>