studentmenu.asp

eayanQuery思燕大学成绩查询系统 版本 V1.6

  <table id="mainmenu" class="MainMenuBar"><tr><td nowrap class='MenuTd' valign='middle'></td><td nowrap id='MainMenuN1215' class='MainMenu' onMouseOver="showmenu('MainMenuN1215','SubMenuN1215' );" onMouseOut="hidemenu('MainMenuN1215','SubMenuN1215');">信息维护</td><td nowrap class='MenuTd' valign='middle'></td><td nowrap id='MainMenuN1216' class='MainMenu' onMouseOver="showmenu('MainMenuN1216','SubMenuN1216' );" onMouseOut="hidemenu('MainMenuN1216','SubMenuN1216');">成绩查询</td><td nowrap class='MenuTd' valign='middle'></td><td nowrap id='MainMenuN1231' class='MainMenu' onMouseOver="showmenu('MainMenuN1231','SubMenuN1231' );" onMouseOut="hidemenu('MainMenuN1231','SubMenuN1231');">公用信息</td><td nowrap class='MenuTd' valign='middle'></td><td nowrap id='MainMenuN1213' class='MainMenu' onMouseOver="showmenu('MainMenuN1213','SubMenuN1213' );" onMouseOut="hidemenu('MainMenuN1213','SubMenuN1213');">系统留言簿</td><td nowrap class='MenuTd' valign='middle'></td><td nowrap class='MenuTd' valign='middle'></td><td nowrap id='MainMenuN9999' class='MainMenu' onMouseOver="showmenu('MainMenuN9999','SubMenuN9999' );" onMouseOut="hidemenu('MainMenuN9999','SubMenuN9999');">退出登录</td><td nowrap class='MenuTd' valign='middle'></td><td nowrap width='100%'></td></tr></table> <table cellpadding='3' cellspacing='0' border='0' id='SubMenuN1214' class='subMenuBar' onMouseOver="showmenu('MainMenuN1214','SubMenuN1214');" onMouseOut="hidemenu('MainMenuN1214','SubMenuN1214');"></table><table cellpadding='3' cellspacing='0' border='0' id='SubMenuN1215' class='subMenuBar' onMouseOver="showmenu('MainMenuN1215','SubMenuN1215');" onMouseOut="hidemenu('MainMenuN1215','SubMenuN1215');"><tr><td name='zhjN121501' class='SubMenu' onMouseOver='doColor(this);' onMouseOut='undoColor(this);'><a href="javascript:void(0)">修改个人信息</a></td></tr><tr><td name='zhjN121502' class='SubMenu' onMouseOver='doColor(this);' onMouseOut='undoColor(this);'><a onclick="window.open('StudentSetPassword.asp?student_name=<%=trim(Request.Cookies("student_name"))%>&Department_id=<%=trim(Request.Cookies("department_id"))%>','gxlb','menubar=0,scrollbars=0,resizable=0,width=400,height=300,left=160,top=220')" href="javascript:void(0)">修改登录密码</a></td></tr> </table><table cellpadding='3' cellspacing='0' border='0' id='SubMenuN1216' class='subMenuBar' onMouseOver="showmenu('MainMenuN1216','SubMenuN1216');" onMouseOut="hidemenu('MainMenuN1216','SubMenuN1216');">  
			<!--此处编写按学期查询成绩的代码-->
			<% Dim StuChooseTerm,StuChooseTermSql
                   StuChooseTermSql="select * from [term_info] order by [term_name] asc"
				   Call OpenConn()
			   Set StuChooseTerm=server.CreateObject("adodb.recordset")
			       StuChooseTerm.open StuChooseTermSql,Initialize_Conn,1,1
			   Do While not StuChooseTerm.eof 
			 %>
			<tr><td name='zhjN121604' class='SubMenu' onMouseOver='doColor(this);' onMouseOut='undoColor(this);'>
<a href="ShowMyScoreList.asp?Term_name=<%=StuChooseTerm("term_name")%>&Term_id=<%=StuChooseTerm("term_id")%>" target='_self'>
			<% If StuChooseTerm("Current_Term")=1 then 
			      Response.Write "<font color=red>"&StuChooseTerm("term_name")&"</font>"
			   else'此处是 当前学期 高亮显示
			      Response.Write StuChooseTerm("term_name")
				End if %></a></td></tr> 
 			<% StuChooseTerm.movenext
			 Loop 
		  StuChooseTerm.close : Set StuChooseTerm=nothing  %>
			</table>
			<table cellpadding='3' cellspacing='0' border='0' id='SubMenuN1231' class='subMenuBar' onMouseOver="showmenu('MainMenuN1231','SubMenuN1231');" onMouseOut="hidemenu('MainMenuN1231','SubMenuN1231');">
			<tr><td name='zhjN123101' class='SubMenu' onMouseOver='doColor(this);' onMouseOut='undoColor(this);'><a href="javascript:void(0)">教务公告</a></td></tr>
		   <tr><td name='zhjN123108' class='SubMenu' onMouseOver='doColor(this);' onMouseOut='undoColor(this);'><a href="http://www.xinhua.ah.cn/bbs/" target='_blank'>访问新华论坛</a></td></tr></table>
		  <table cellpadding='3' cellspacing='0' border='0' id='SubMenuN1213' class='subMenuBar' onMouseOver="showmenu('MainMenuN1213','SubMenuN1213');" onMouseOut="hidemenu('MainMenuN1213','SubMenuN1213');"><tr><td name='zhjN121300' class='SubMenu' onMouseOver='doColor(this);' onMouseOut='undoColor(this);'><a href="guestbook/publicgb.asp" title="您的留言所有人都能看到." target='_blank'>公共留言簿</a></td></tr> </table>
		 <table cellpadding='3' cellspacing='0' border='0' id='SubMenuN9999' class='subMenuBar' onMouseOver="showmenu('MainMenuN9999','SubMenuN9999');" onMouseOut="hidemenu('MainMenuN9999','SubMenuN9999');"><tr><td name='zhjN9999' class='SubMenu' onMouseOver='doColor(this);' onMouseOut='undoColor(this);'><a href=include/Student_logou.asp target='_self'>退出系统</a></td></tr></table>