⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 add_ach.asp

📁 网上学生管理信息系统,能够方便高校老师管理学生的信息,同时也便于学生网上查询
💻 ASP
字号:
<!--#include file="conn.asp"-->
<%
if session("admin")="" then
	response.write "<script>alert('您无此权限');document.location.href='index.asp';</script>"
	response.end
end if
%>

<%
dim user_name,user_testnumber,user_class,testno,subject,ach,subject_type,teacher_name
user_name=trim(request("user_name"))
user_testnumber=trim(request("user_testnumber"))
user_class=trim(request("user_class"))
testno=trim(request("testno"))
subject=trim(request("subject"))
ach=trim(request("ach"))
subject_type=trim(request("subject_type"))
teacher_name=trim(request("teacher_name"))
%>

<%
set rs=createobject("adodb.recordset")
sql="select * from ach where user_testnumber='"&user_testnumber&"' and subject='"&subject&"' and testno='"&testno&"' and user_class='"&user_class&"'"
rs.open sql,conn,1,3
%>
<%
if not rs.eof then
	'response.write "准考证号"& user_testnumber &"该课程成绩已经存在,如要修改请到修改页面。"
	response.write "<font color=red>"&user_class&"的准考证号"&user_testnumber&"</font>在&nbsp;<font color=red>"&testno&"</font>中的该课程成绩已经存在,如要修改请到修改页面。"&"<a href='Javascript:window.history.go(-1)'>返回</a>"
	response.end
else
	rs.addnew
	rs("user_name")=user_name
	rs("user_testnumber")=user_testnumber
	rs("user_class")=user_class
	rs("testno")=testno
	rs("subject")=subject
	rs("ach")=ach
	rs("subject_type")=subject_type
	rs("teacher_name")=teacher_name
	rs.update
	rs.close
	set rs=nothing
	response.write "该课程成绩添加成功!"
end if
%>
<%
set rs1=server.createobject("adodb.recordset")
sql1="select * from total_ach where user_testnumber='"&user_testnumber&"' and testno='"&testno&"' and user_class='"&user_class&"'"
rs1.open sql1,conn,1,3

if not rs1.eof then
	rs1("total_ach")=rs1("total_ach")+ach
	rs1.update
	rs1.close
	set rs1=nothing
		response.write "总成绩添加成功,请<a href='Javascript:window.history.go(-1)'>返回</a>"
else
	rs1.addnew
	rs1("user_testnumber")=user_testnumber
	rs1("user_name")=user_name
	rs1("user_class")=user_class
	rs1("testno")=testno
	rs1("total_ach")=ach
	rs1.update
	rs1.close
	set rs1=nothing
	response.write "总成绩添加成功,请<a href='Javascript:window.history.go(-1)'>返回</a>"
end if
%>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -