userdel.asp

来自「学生管理功能: 1.添加单个成绩 2.批量添加成绩 3.通过搜索并修改与删除」· ASP 代码 · 共 26 行

<!--#include file="a25175_conn.asp"-->
<%
dim username,REALNAME,DEPART
DEPART=trim(request("DEPART"))
REALNAME=trim(request("REALNAME"))
username=trim(request("username"))
if username="" then
response.write"<script>alert('不要错误操作！');location='USERADMIN.asp'</script>"	
else
strsql="delete from USERInfo where username='"&username&"'"
db.execute(strsql)
strsql="delete from TEACHERSCORE where userID='"&username&"'"


'----------------------------------------------------------------------------------------
db.execute(strsql)
strsql="delete from TEACHERNEW where TEACHERID='"&REALNAME&"' AND DEPART='"&DEPART&"'"
db.execute(strsql)
strsql="delete from TEACHER where TEACHERNAME='"&REALNAME&"' AND DEPART='"&DEPART&"'"
db.execute(strsql)
strsql="delete from TEACHERCOURSE where TEACHERNAME='"&REALNAME&"' AND DEPARTMENT='"&DEPART&"'"
db.execute(strsql)
response.write"<script>alert('删除用户成功！');location='USERADMIN.asp'</script>"	
end if
%>
<% databaseclose()%>