📄 jsbjcjlr.asp

📁 学生成绩管理是学校管理的重要组成部分。成绩不仅关系到学生成绩升迁

💻 ASP

字号:

<%@ language=vbscript %>
<!--#include file="conn.asp"-->
<%  

dm=request("dm")


  if Session.Contents("dm")=dm then
zybj=request("zybj")
dm=request("dm")

bjbh=request("bjbh")
mc=request("mc")
sj=request("sj")
  set rs=server.createobject("adodb.recordset")
 sql="select * from zybjmc where zybj='" + zybj + "'"
 rs.open sql,conn,1,1

 set rs2=server.createobject("adodb.recordset")
 sql2="select * from js where zybj='" + zybj + "'"
 rs2.open sql2,conn,1,1
 
 set rs1=server.createobject("adodb.recordset")
 sql1="select * from xg where zybj='" + zybj + "'"
 rs1.open sql1,conn,1,1

 
  if dm=cstr(rs2(sj)) and rs1(sj)=1 then
  
   response.redirect("jsbjcjl.asp?bjbh="&bjbh&"&dm="&dm&"&zybj="&zybj&"&mc="&rs(sj)&"&sj="&sj&"")
  
else
%>
<body bgcolor="#FFFFFF" text="#000000" background="bg01.gif">
<p align="center">对不起，你不能修改这门课的成绩! </p>
<%
end if

end if
%>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -