del_yuanxi.asp

来自「一个基于ＡＳＰ的学生管理系统」· ASP 代码 · 共 26 行

<!--#include file="inc/conn.asp"-->

<% 
id=Trim(Request.QueryString("id"))
openDB
sql="select * from xi where x_name='"&id&"'"
set rs=conn.execute(sql)
if not rs.eof then
sql="delete from xi where x_name='"&id&"'"
set rs=conn.execute(sql)
sql="delete from stu where stu_xname='"&id&"'"
set rs=conn.execute(sql)
else
 sql="select * from xueyuan where xy_name='"&id&"'"
 set rs=conn.execute(sql)
 xy_id=rs("xy_id")
 sql="delete from xi where xy_id='"&xy_id&"'"
 set rs=conn.execute(sql)
 sql="delete from xueyuan where xy_name='"&id&"'"
 set rs=conn.execute(sql)
 sql="delete from stu where stu_xyname='"&id&"'"
 set rs=conn.execute(sql)
 end if
 closeDB
 Response.Redirect "add_yuanxi.asp"
 %>