📄 score_inputmodify.asp

📁 一个修改过的ASP学籍管理系统,用javascript+ado写的
💻 ASP
字号:
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp"-->
<!--#include file="verifyTeacher.asp"-->
<%
var StudentId;
var StudentPro;
var Rs;
var TableRs;
var CourseTab;
var TableName
var CutNum;
var OtherNum;
var i;
var j;
var k;
var h;
var all;
StudentId=Request.QueryString("studentmessage");
Rs=Server.CreateObject("ADODB.Recordset");
Rs.ActiveConnection=Conn;
Rs.CursorLocation=3;
Rs.Source="SELECT professionId FROM student WHERE studentNo="+StudentId;
Rs.Open();
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>学生成绩输入修改界面</title>
<!--#include file="link.asp"-->
</head>
<body>
<!--#include file="top.asp"-->
<%
if(Rs.EOF)
   {
       Response.Write("<div align=center><font size='6' color='#ff0000'>数据库发生错误,显示无此专业,请与管理员联系！</font></div>");
   }
if(!Rs.EOF)
   {
      		  CourseTab=Server.CreateObject("ADODB.Recordset");
			  CourseTab.ActiveConnection=Conn;
			  CourseTab.CursorLocation=3;
			  CourseTab.Source="SELECT * FROM course WHERE professionId ="+Rs("professionId");
			  CourseTab.Open();
			  %>
			  
			  <table border="1" width="760" cellPadding="0" cellSpacing="0" bgcolor="#CCFFFF" borderColor="#111111" borderColorDark="#000000" borderColorLight="#000000" style="BORDER-COLLAPSE: collapse">
              <form action="score_inputmodify_result.asp" method="post">
              <table border="1" width="760" cellPadding="0" cellSpacing="0" bgcolor="#CCFFFF" borderColor="#111111" borderColorDark="#000000" borderColorLight="#000000" style="BORDER-COLLAPSE: collapse">
              <tr>
               <td height="20" width="760" colspan="3"><div align="center"><font size="2" color="#FF0000">您所操作的学生学籍号为:</font><input size='12' value="<%=StudentId%>" name='studentid' id='studentid'></div></td>
               </tr>
               <tr>
               <td height='20' width='760' colspan='3'><div align='center'><font size='2' color='#FF0000'>该专业所学课程总数为:</font><input size='12' value="<%=CourseTab.RecordCount%>" name='num' id='num'></div></td>
               </tr>
               <tr>
                    	<td><div align='center'><font size='2' color='#FF0000'>课程名</font></td>
                        <td width="33%"><div align='center'><font size='2' color='#FF0000'>分数</font></td>
                        <td width="33%"><div align='center'><font size='2' color='#FF0000'>补考重修</font></td>
                    </tr>
			  <%
		     	while(!CourseTab.EOF){
			%>
					<tr>
                    	<td><div align='center'><%=CourseTab("name")%><input type="hidden" value="<%=CourseTab("id")%>" name="courseId"></div></td>
                        <td><div align='center'><input type="text" size="10" maxlength="5"></div></td>
                        <td>
                        <label>
            正常:<input type="radio" name="<%=CourseTab("name")%>" value="正常" />
            </label>
                        <label>
            补考:<input type="radio" name="<%=CourseTab("name")%>" value="补考" />
            </label>
          <label>
            重修:<input type="radio" name="<%=CourseTab("name")%>" value="重修" />
            </label></td>
                    </tr>
                    <%
					CourseTab.MoveNext;
				}
				 	%>
				 	<tr>	     
					<tr>
					<td height='20' width='760' colspan='3'><div align='center'><input type='submit' value='确定'></div></td>
					</tr>
					</table>
					</form>
					</table>
                    <%
		  }
       CourseTab.Close();
	   CourseTab=null;
Rs.Close();
Rs=null;
Conn.Close();
Conn=null;
	   
%>
</body>
</html>
⌨️ 快捷键说明

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