incfirst.asp

教师教学质量评价系统 教师教学质量评价系统 asp 源代码

<!--#include file="Odbc_connection.asp"-->
<%
sub teacher()
sql = "select * FROM TEACHER order by ID asc"
set rs=server.createobject("ADODB.Recordset")
rs.open sql,db,1,1%>
<script language = "JavaScript">
var onecount1;
onecount1=0;
subcat1 = new Array();
<%count = 0
do while not rs.eof%>
subcat1[<%=count%>] = new Array("<%= trim(rs("TEACHERNAME"))%>","<%= trim(rs("DEPARTID"))%>","<%= trim(rs("ID"))%>");
        <%count = count + 1
        rs.movenext
        loop
        rs.close
        set rs=nothing%>
onecount1=<%=count%>;
function changelocation1(addone)
    {
    document.addform.teacher.length = 0; 
   
    var addone_id=addone_id;
    var i;
	
	
    document.addform.teacher.options[0] = new Option('请选择教师','请选择教师');
    for (i=0;i < onecount1; i++)
        {
            if (subcat1[i][1] == addone)
            { 
                document.addform.teacher.options[document.addform.teacher.length] = new Option(subcat1[i][0], subcat1[i][2]);
            }        
        }
		
        
    }
</script>




<table width="100%" border="0" cellpadding="0" cellspacing="0" align="center">

  <tr>	<td width="20%" height="40"><select name="depart" id="depart" onChange="changelocation1(document.addform.depart.options[document.addform.depart.selectedIndex].value)">
<option value="请选择教师院系" selected>请选择教师院系</option>
                    <%
sql="select * from DEPARTMENT order by ID desc"
set rs=server.createobject("ADODB.Recordset")
rs.open sql,db,1,1
while not rs.eof%>
<option value="<%=rs("id")%>"><%=rs("DEPARTMENT")%></option>
<%rs.movenext
wend
rs.Close()
%> 
</select>
      </td>
    <td width="16%"><select name="teacher" id="teacher">
      <option selected value="请选择教师">请选择教师</option>
    </select></td>
    <td width="64%"><input type="submit" name="Submit" value="选择学期和课程"></td>
  </tr>
 
</table>
<script language="javascript"> 
    changelocation1(document.addform.addone_id.options[document.addform.addone_id.selectedIndex].value); 
</script>

<%
end sub%>


<%
sub classterm()
sql = "select * FROM TEACHERCOURSE order by ID desc"
set rs=server.createobject("ADODB.Recordset")
rs.open sql,db,1,1%>
<script language = "JavaScript">
var onecount1;
onecount1=0;
subcat1 = new Array();
<%count = 0
do while not rs.eof%>
subcat1[<%=count%>] = new Array("<%= trim(rs("COURSE"))%>","<%= trim(rs("TERMID"))%>","<%= trim(rs("ID"))%>");
        <%count = count + 1
        rs.movenext
        loop
        rs.close
        set rs=nothing%>
onecount1=<%=count%>;
function changelocation1(addone)
    {
    document.addform.addtwo_id.length = 0; 
   
    var addone_id=addone_id;
    var i;
	
	
    document.addform.addtwo_id.options[0] = new Option('请选择教师课程','');
    for (i=0;i < onecount1; i++)
        {
            if (subcat1[i][1] == addone)
            { 
                document.addform.addtwo_id.options[document.addform.addtwo_id.length] = new Option(subcat1[i][0], subcat1[i][2]);
            }        
        }
		
        
    }
</script>




<table width="100%" border="0" cellpadding="0" cellspacing="0" align="center">

  <tr>	<td width="85%" height="40"><select name="addone_id" onChange="changelocation1(document.addform.addone_id.options[document.addform.addone_id.selectedIndex].value)">
<option value="" selected>请选择教师开课学期</option>
                    <%
sql="select * from TERM order by ID desc"
set rs=server.createobject("ADODB.Recordset")
rs.open sql,db,1,1
while not rs.eof%>
<option value="<%=rs("id")%>"><%=rs("TERM")%></option>
<%rs.movenext
wend
rs.Close()
%> 
</select>
<select name="addtwo_id">
<option selected value="">请选择教师课程</option>
</select>
</td>
  </tr>
 
</table>
<script language="javascript"> 
    changelocation1(document.addform.addone_id.options[document.addform.addone_id.selectedIndex].value); 
</script>

<%
end sub%>