⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 index.asp

📁 学校成绩查询系统是一个非常好的软件请大家试试
💻 ASP
字号:
<!--#include file="dataconn.asp"-->
<%
dim set_test,newks
set rs=conn.execute("select comname,cxsetup2 from cominfo")
if not rs.eof then
comname=rs("comname").value
cxsetup2=rs("cxsetup2").value
end if
set rs=nothing 
set rs=conn.execute("select testmdb.testname,testmdb.term,testmdb.tc from testmdb,term where testmdb.term=term.tname and tnow=1 order by testid desc")
          if rs.eof then
		  response.write "暂时还未添加考试"
		  else
		  newks=rs("testname").value
		  if cxsetup2="0" then
		  set_test=set_test&"<option value=""all"" selected>当前所有考试</option>" 
		  do while not rs.eof
              set_test=set_test&"<option value='"&rs("testname")&"'>"%>
			  <% if rs("tc")="0" then set_test=set_test&rs("testname") else set_test=set_test&rs("testname")&"√" end if%><%
	          set_test=set_test&"</option>"
			  rs.movenext
          loop
		  else
		  set_test="<option value='"&rs("testname")&"' selected>"%>
			  <% if rs("tc")="0" then set_test=set_test&rs("testname") else set_test=set_test&rs("testname")&"√" end if%><%
	          set_test=set_test&"</option>"
		  end if
		  end if
          set rs=nothing  
              
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="inc/Admin_Style.css">
<title><%=comname%>查分系统</title>
<SCRIPT language="JavaScript">
function CheckInput()        
{ 
 if (document.form.xh.value == "")        
  {        
    alert("号码不能为空!");        
    document.form.xh.focus();        
    return false;        
  }   
  if (document.form.stuname.value == "")        
  {        
    alert("姓名不能为空!");        
    document.form.stuname.focus();        
    return false;        
  }
  var xh = document.getElementById("xh").value;
  var stuname = document.getElementById("stuname").value;
  var team = document.getElementById("team").value;
  GetResult(xh,stuname,team);      
 }
 function GetResult(xh,stuname,team)
{
     var xh = document.getElementById("xh").value;
  var stuname = document.getElementById("stuname").value;
  var team = document.getElementById("team").value;
    var oBao = new ActiveXObject("Microsoft.XMLHTTP");
    oBao.open("POST","search.asp?xh="+escape(xh)+"&stuname="+escape(stuname)+"&team="+escape(team),false);
    oBao.send();
	var backstring=unescape(oBao.responseText);
	document.all.msg.innerHTML =backstring;
}
//-->
</script> 
<style type="text/css">
<!--
body {
	background-color: #e1f2fe;
}
-->
</style></head>
<body>
<div class="top" style="width: 985px; height: 133px">
<div class="box_1">
<p align="center">
 </p>
<p align="center">
 </p>
<p align="center">
<b><font size="7" color="#FF0000" face="黑体"><%=comname%>查分系统</font></b></p>
</p>
</div>
<div class="box_2"></div>
<br>
<br>
<!--搜 索-->
<form name="form" action="javascript:void(null);" onSubmit="CheckInput();">
  <table border="0" width="985" id="table1">
	<tr>
		<td>
  <p align="center"> <font size="4">请输入学号或考号:</font>
    <input name="xh" type="text" id="xh" size="12" style="font-size: 14pt; height: 30; width: 145">
    </p>
	<p align="center"> <font size="4">请再输入姓名:</font>
    <input name="stuname" type="text" id="stuname" size="12" style="font-size: 14pt; height: 30">
    </p>
	<p align="center"> <font size="4">请选择查询项目</font>&nbsp;
    <select size="1" name="team" style="font-size: 12pt; height: 30">
     <%=set_test%>
    </select>&nbsp;&nbsp;</p>
	<p align="center"> &nbsp;<input type="submit" value=" 查 询 " style="font-size: 14pt; height: 30">  
  </p>   
  		<p> </td>
	</tr>
	</table>
  <p align="center"><font color="#0000FF"> 
  最新考试:<%=newks%><br>  
  </font>   
</form>   
<hr>
<p align="center"><font id="msg">【<a href="admin/">管理入口</a>】</font></p> 
<p align="center"></p> 
<p align="center"> 
</div>

</body> 
 
</html> 

⌨️ 快捷键说明

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