📄 deluser.asp
字号:
<%
if Session("ljl_liujinlu")="" or Session("ljl_grad")="" then%>
<script language=vbscript>
MsgBox "错误:非法用户!"
location.href = "login.asp"
</script>
<%end if%>
<!--#include file="bkconn.asp"-->
<%
if request.querystring("id")="" then
response.write "没有正确的ID号"
else
uid=clng(request.querystring("id"))
end if
Set rs=server.createobject("adodb.recordset")
SQL="select * from user where id=" &uid
rs.open sql,conn,1,3
do while not rs.eof
conn.Execute(SQL)
rs.delete
rs.update
rs.movenext
loop
set rs=nothing
conn.close
set conn=nothing%>
<script language=vbscript>
MsgBox "系统提示:删除成功,请返回!"
location.href = "useradd.asp"
</script>
<html></html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -