📄 delete.asp
字号:
<!--#include file="../../System/Const.asp"-->
<!--#include file="../../System/misc.asp"-->
<%
set cn=server.CreateObject("ADODB.connection")
cn.Open DSN_ACLASS
count=0
uid=""
for each i in Request.Form("SelectedUser")
id=i
if ID<>cstr(session("userid")) then
cn.execute "delete from "&TBL_USER&" where ID="+ID+""
cn.execute "delete from CLASSUSER where UID="+ID+""
count=count+1
uid=uid+ID+";"
end if
next
set acman=server.CreateObject("ACManCOM.ACMan")
acman.DelUser "123456", "123456", IA_Server_IP(cn), IA_Server_PORT(cn), count, uid
set acman=nothing
cn.close
set cn=nothing
Response.Redirect "list.asp"
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -