save_stu_add.asp

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

 
<!--#include file="conn2.asp"-->
<%
'on error resume next
MaxIdSql="select ID from stuinit order by ID desc"
set rsT=conn.execute(MaxIdSql)
if rsT.eof then
	NextId=1
else
	NextId=rsT("ID")+1
end if
'NextId=rsT("ID")+1

stuNum=trim(request("stu_num"))
VerificationSql="select STU_NUM from stuinit where STU_NUM='"&stuNum&"'"
set rsT=conn.execute(VerificationSql)
if not rsT.eof then
	Session("sa_help")="对不起，这个考生学号已经有了！请重试！"
	response.redirect("stu_add.asp")
end if

stuName=trim(request("stu_name"))
stuClass=trim(request("stu_class"))
stuSex=trim(request("stu_sex"))
'stuResult=trim(request("stu_result"))
'stuIp=trim(request("stu_ip"))
'stuLogin=trim(request("stu_login"))
'stuSubmit=trim(request("stu_submit"))

saveAddSql="insert into stuinit values("&NextId&",'"&stuNum&"','sa','"&stuName&"','"&stuClass&"','"&stuSex&"','0','0','0','0')"
set rsT=conn.execute(saveAddSql)
Session("sa_help")="上条记录添加完毕！"
conn.close
set conn=nothing
server.transfer("stu_add.asp")
%>