oscore3=CDbl(request.form("score3"))
oscore4=CDbl(request.form("score4"))
oscore5=CDbl(request.form("score5"))
oscore6=CDbl(request.form("score6"))
oscore7=CDbl(request.form("score7"))
oscore8=CDbl(request.form("score8"))
oscore9=CDbl(request.form("score9"))
oscore10=CDbl(request.form("score10"))
oscore11=CDbl(request.form("score11"))
if request.form("Content")<>"" then
sql="select * from ddoption"
set rscat=server.createobject("adodb.recordset")
rscat.open sql,conn,1,3
If len(request.form("Content"))<1000 then
rscat.addnew
rscat("cat_id")=oid
rscat("dd_content")=trim(request.form("Content"))
rscat("py_kc")=kc_name
rscat("dd_time")=Now()
rscat.update
rscat.close
set rscat=nothing
else
errmsg = errmsg &+"<br>"+ "<li>内容不能超过1000字!</li><br>"
FoundErr=True
rscat.close
set rscat=nothing
end if
end if
if founderr then
call diserror()
response.End
end if
dim sum
sum=""
sum=oscore1+oscore2+oscore3+oscore4+oscore5+oscore6+oscore7+oscore8+oscore9+oscore10+oscore11
sql="select * from score where t_id="&oid&" and kc_name='"&kc_name&"'"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,3,2
if rs.eof and rs.bof then
rs.addnew
rs("t_id")=oid
rs("kc_name")=kc_name
if Session("dd_flag")=1 then
rs("ydd_cs")=1
rs("yddscore1")=oscore1
rs("yddscore2")=oscore2
rs("yddscore3")=oscore3
rs("yddscore4")=oscore4
rs("yddscore5")=oscore5
rs("yddscore6")=oscore6
rs("yddscore7")=oscore7
rs("yddscore8")=oscore8
rs("yddscore9")=oscore9
rs("yddscore10")=oscore10
rs("yddscore11")=oscore11
rs("yddscore")=sum
elseif Session("dd_flag")=2 then
rs("sdd_cs")=1
rs("sddscore")=sum
rs("sddscore1")=oscore1
rs("sddscore2")=oscore2
rs("sddscore3")=oscore3
rs("sddscore4")=oscore4
rs("sddscore5")=oscore5
rs("sddscore6")=oscore6
rs("sddscore7")=oscore7
rs("sddscore8")=oscore8
rs("sddscore9")=oscore9
rs("sddscore10")=oscore10
rs("sddscore11")=oscore11
end if
else
dim a
if CommentedID="" then
session("CommentedID")=kc_name
else
session("CommentedID")=CommentedID & "|" & kc_name
end if
response.write"<script language=java script>{window.alert('测评已经提交!谢谢!');window.location.href='ddpy.asp';}</script>"
if founderr then
call diserror()
response.End
end if
end sub%></head>
4.4 后台数据库管理
系统管理员登录后台管理页面后,见图4-10,需要用户输入管理员名称和密码和验证码,系统默认的管理员是ncist,密码也是ncist,单击“登录”按钮后,进入页面如图1-11所示。
图4-10 系统管理员界面
图4-11 后台管理界面
进入这个页面后,系统提供了“用户管理”、“标语管理”、“教师情况管理”、“督导管理”、“处理教师反馈”、“数据管理”“管理首页”和“退出管理”等模块。
单击“标语管理”,进入图4-12的页面,从这个页面可以对系统中的宣传标
首页 上一页 5 6 7 8 9 10 下一页 尾页 8/10/10
免费VC++基于校园网的学院教学质量监测评估系统(八)由毕业论文网(www.huoyuandh.com)会员上传。