db_trylist_del.asp

来自「这是一个用ASP写的在线考试系统.特别一点 就是考试试卷有两种考法,一种为系统」· ASP 代码 · 共 32 行

<!--#include file="conn2.asp"-->
<%
'on error resume next
tryInfoIdT=request("delId")
'DelFlagSql="select DB_MODFIYFLAG,DB_ONOFFT from tryinfo1 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_tryInfo_list.asp")
'end if
'tryInfoSql="select id,DB_TRYNAME,DB_NAME from tryInfo1 where id="&tryinfoidt
'set rsT=conn.execute(tryInfoSql)


'listdbnameSql="select try_subject from "&rst("db_name")&" where id= "&tryinfoidt 
'set rsT=conn.execute(listdbnameSql)
'subject=rsT("try_subject")


delSql="delete from "&session("addnamet")&"  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_trylist_del.asp")
%>