cjgk3.asp

来自「学生成绩管理是学校管理的重要组成部分。成绩不仅关系到学生成绩升迁」· ASP 代码 · 共 53 行

ASP
53
字号
<%

  if Session.Contents("gws")<>true then
 %>
<body text="#000000" background="bg01.gif">
<p align="center">请重新登录!
<%  
else
%>
<!--#include file="conn.asp"-->
<%
 dim rs
 dim sql
  set rs=server.createobject("adodb.recordset")
 sql="select * from cjgk  where bh=4"
 rs.open sql,conn,3,3

%>
<html>
 <head>
  <title>班主任权限管理</title>
 </head>
 <body topmargin=0 leftmargin=0 rightmargin=0 bgcolor="#FFFFFF" background="BG01.gif">
    <center>
  <font face="华文行楷" size="6" color="#FF0000"><b>班主任权限管理</b></font></center>
 <form action=cjxg3.asp method=post>
 <center>

    <%
   cjgk=rs("cjgk")
       if cjgk="是" then
    %>
       <input type=radio name="cjgk" value="是" checked>准班主任修改学生成绩<p>
       <input type=radio name="cjgk" value="否"><font color="#FF0000">不</font>准班主任修改学生成绩
                  <%   
    else
    %>
       <input type=radio name="cjgk" value="是">准班主任修改学生成绩<p>
       <input type=radio name="cjgk" value="否" checked><font color="#FF0000">不</font>准班主任修改学生成绩
          <%
    end if
    %>
           
  
   
    <p><input type=submit value="提交">&nbsp;&nbsp;&nbsp; <input type=reset value="还原"></p>
  </form> </center>
  <p>
 </body>
</html>
<%
end if
%>

⌨️ 快捷键说明

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