db_shijuan_del.asp

这是一个用ASP写的在线考试系统.特别一点 就是考试试卷有两种考法,一种为系统自动出卷,另一种是老师出卷考试.前者的实现是参考网上代码.总的来说还是很值得参考的.

<!--#include file="conn2.asp"-->
<%
'on error resume next
tryInfoIdT=request("delId")
DelFlagSql="select DB_MODFIYFLAG,DB_ONOFFT from tryshijuan where id="&tryinfoidt '要修改
set rsT=conn.execute(DelFlagSql)
DB_MODFIYFLAGT=rsT("DB_MODFIYFLAG")
DB_ONOFFTT=rsT("DB_ONOFFT")
if DB_MODFIYFLAGT=0 or DB_ONOFFTT=0 then
	Session("sa_help")="该题库数据正在修改，不能删除！"
server.Transfer("db_shijuan_list.asp")
end if

listdbnameSql="select name,bNAME from tryshijuan where id= "&tryinfoidt 
set rsT=conn.execute(listdbnameSql)
dbname=rsT("bNAME")


delSql="delete  from tryshijuan where  id="&tryinfoidt
set rsT=conn.execute(delSql)

dropTableSql="drop table "&dbname 
set rsT=conn.execute(dropTableSql)
Session("sa_help")="该题库数据已删除！"
conn.close
set conn=nothing
server.Transfer("db_shijuan_list.asp")
%>