📄 score_query.asp
字号:
<!--#include file="inc.asp"-->
<!--#include file="inc/cnwyopen.asp"-->
<%
dim lx,tj
dim rs,sql
lx=request.querystring("lx")
tj=request.querystring("tj")
if lx=0 then
%>
<script language="vbscript">
msgbox("请正确输入查找类型~!")
window.history.go(-1)
</script>
<%end if
if tj="" then%>
<script language="vbscript">
msgbox("查找条件不能为空~!")
window.history.go(-1)
</script>
<%end if%>
<%if lx=1 then
sql="select * from score where username='"&tj&"'"
elseif lx=2 then
sql="select * from score where zkz='"&tj&"'"
elseif lx=3 then
sql="select * from score where class='"&tj&"'"
end if
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
if not rs.eof then
pagesize=20 '每一页的信息条数
Page=clng(Request.QueryString ("Page"))
if page<1 then page=1
if page>rs.PageCount then page=rs.PageCount
%>
<%call top()%>
<table width="781" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#FFFFFF" bgcolor="#FFFFFF">
<tr background="IMG/topbg.gif">
<td colspan="3"><%call head()%></td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="204"><table width="100%" border=0 cellpadding=1 cellspacing=1 bgcolor="#EFEFEF">
<tbody>
<tr bordercolor=#999999>
<td valign=center bordercolor=#999999 align=middle bgcolor=#efefef
height=17><div align="center"><img src="img/user.gif" width="200" height="22"></div></td>
</tr>
<tr>
<td valign=top bgcolor=#efefef>
<table id=AutoNumber2 style="BORDER-COLLAPSE: collapse"
cellspacing=0 cellpadding=0 width="100%" border=0>
<tbody>
<tr>
<td align=middle>
<%if request.cookies("cnwy")="" then%>
<form name=form1 action=CHECK.ASP
method=post>
<table width=0 border=0>
<tbody>
<tr>
<td width=83>
<div align=center> 准考证号：</div></td>
<td width=106><input id=zkz size=13
name=zkz></td>
</tr>
<tr>
<td width=83>
<div align=center>密码：</div></td>
<td width=106><input id=password type=password size=13
name=password></td>
</tr>
<tr>
<td width=83 height=21>
<div align=center>
<input type=submit value=登陆 name=Submit>
</div></td>
<td width=106>
<div align=center>
<input type=reset value=取消 name=Submit>
</div></td>
</tr>
</tbody>
</table>
</form>
<%else%>
<table width="0" border="0">
<%
dim rs3,sql3
set rs3=server.createobject("adodb.recordset")
sql3="select * from user where name='"&request.cookies("name")&"'"
rs3.open sql3,conn,1,1
%>
<tr>
<td colspan="2">欢迎<span class="style1"><%=rs3("name")%><span class="style2">同学来到吻宇考试系统 </span></span></td>
</tr>
<tr>
<td colspan="2">我的准考证号：<%=rs3("zkz")%></td>
</tr>
<tr>
<td colspan="2">我所在的班级<%=rs3("class")%></td>
</tr>
<tr>
<td width="87" bgcolor="#efefef"><div align="center"><span class="style3"><a href="user_ks.asp?id=<%=RS3("id")%>" class="style3">我的考试信息</a></span></div></td>
<td width="99"><div align="right" class="style3">
<div align="center"><a href="user_xg.asp?id=<%=rs3("id")%>">我的资料修改</a></div>
</div></td>
</tr>
<tr>
<td colspan="2"><div align="center"><a href="exit.asp">退出考试管理系统</a></div></td>
</tr>
</table>
<%end if%></td>
</tr>
</tbody>
</table></td>
</tr>
<tr bordercolor=#999999>
<td bordercolor=#999999 align=left bgcolor=#efefef>
</tr>
<tr bordercolor=#999999>
<td align=middLe background=IMG/lljs.gif bgcolor=#efefef
height=18><div align="center"><img src="img/tj.gif" width="200" height="22"></div></td>
</tr>
<tr bordercolor=#999999>
<td bgcolor=#efefef><font color=#000000>
<script src=js.asp></script>
</font></td>
</tr>
<tr bordercolor=#999999>
<td valign=ceNter
bgcolor=#efefef height=18>
<div align=center><img src="img/hezuo.gif" width="200" height="22"></div></td>
</tr>
<tr bordercolor=#999999>
<td valign=cEnter bgcolor=#efefef height=10>
<table width=0 align=center border=0>
<tbody>
<tr>
<td width=87> </td>
</tr>
<tr>
<td><a href="http://www.e0b.com/"><img height=31
src="IMG/tclogo.gif" width=88
border=0></a></td>
</tr>
</tbody>
</table>
<p align=center><font color=#000000><br>
</font></p></td>
</tr>
<tr bordercolor=#999999>
<td valign=cenTer bgcolor=#efefef
height=15> </td>
</tr>
</tbody>
</table></td>
<td width="7" background="IMG/sd.gif"> </td>
<td width="600"><table width="572" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="572" height="20" background="img/lmtop.gif">||<a href="score.asp">分数首页</a>
<%
dim rs2,sql2
set rs2=server.CreateObject("adodb.recordset")
sql2="select * from kemu order by id ASC"
rs2.open sql2,conn,1,1
if not rs2.eof then
rs2.movefirst
do while not rs2.eof
id=trim(rs2("id"))%>
<span class="top">||</span><a href="score.asp?kemu=<%=rs2("name")%>"><%=rs2("name")%></a>
<%rs2.movenext
loop
else
response.write"暂时没有任何数据"
end if
rs2.close
set rs2=nothing
%>
<span class="top">||</span></td>
</tr>
<tr>
<td height="25"><table width="566" height="25" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="419" height="23" rowspan="2"><form name="form2" method="get" action="score_query.asp">
具体搜索：
<select name="lx">
<option value="0">查找类型</option>
<option value="1">真实姓名</option>
<option value="2">准考证号</option>
<option value="3">所在班级</option>
</select>
<input name="tj" type="text" value="请输入你要查找的条件">
<input type="submit" name="Submit2" value="查找">
</form></td>
<td width="140" rowspan="2"> </td>
</tr>
</table></td>
</tr>
<tr>
<td><img src="img/td.gif" width="572" height="4"></td>
</tr>
<tr>
<td>
<table width="0" border="0" align="center" cellpadding="1" cellspacing="1" bgcolor="#67B0ED">
<tr>
<td width="90" bgcolor="#FFFFFF"><div align="center">考生准考证</div></td>
<td width="72" bgcolor="#FFFFFF"><div align="center">考生姓名</div></td>
<td width="94" bgcolor="#FFFFFF"><div align="center">考生所在班级</div></td>
<td width="76" bgcolor="#FFFFFF"><div align="center">考试科目</div></td>
<td width="69" bgcolor="#FFFFFF"><div align="center">考试的分数</div></td>
<td width="109" bgcolor="#FFFFFF"><div align="center">参加考试的时间</div></td>
</tr>
<%
if not rs.eof then
rs.movefirst
rs.AbsolutePage=Page
for i=1 to pagesize
id=rs("id")
kemu=rs("kemu")
username=rs("username")
score=rs("score")
ksdate=rs("ksdate")
wytype=rs("type")
%>
<tr>
<td bgcolor="#FFFFFF"><div align="center"><%=rs("zkz")%></div></td>
<td bgcolor="#FFFFFF"><div align="center"><a href=javascript:cnwyopen('user_zl.asp?zkz=<%=rs("zkz")%>','吻宇考试管理系统','width=500,height=500')><%=rs("username")%></a></div></td>
<td bgcolor="#FFFFFF"><div align="center"><%=rs("class")%></div></td>
<td bgcolor="#FFFFFF"><div align="center"><%=rs("kemu")%></div></td>
<td bgcolor="#FFFFFF"><div align="center"><%=rs("score")%></div></td>
<td bgcolor="#FFFFFF"><div align="center"><%=rs("ksdate")%></div></td>
</tr> <%rs.movenext
if rs.eof then exit for end if
next
else
response.write"暂时没有任何数据"
end if
%>
</table>
</td>
</tr>
<tr>
<td><img src="img/td.gif" width="572" height="4"></td>
</tr>
<tr>
<td><table width="572" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="330"><div align="center">总考试信息数:<%=rs.recordcount%> 条 总页数:<%=rs.PageCount%>页 当前页数:<%=Page%>/<%=rs.pagecount%> 页 </div></td>
<td width="242"> <%if page=1 then%><div align=center> |第一页|上一页|<a href=score.asp?lx=<%=lx%>&tj=<%=tj%>&Page=<%=Page+1%>>下一页</a>|<a href=score.asp?lx=<%=lx%>&tj=<%=tj%>&Page=<%=rs.PageCount%>>最后一页</a>|</div></td>
<%elseif page=wyrs.pagecount then%>
<div align=center> |<a href=score.asp?lx=<%=lx%>&tj=<%=tj%>&Page=1>第一页</a>|<a href=score.asp?lx=<%=lx%>&tj=<%=tj%>&Page=<%=Page-1%>>上一页</a>|下一页|最后一页|</div></td>
<%else%>
<div align=center> |<a href=score.asp?lx=<%=lx%>&tj=<%=tj%>&Page=1>第一页</a>|<a href=score.asp?lx=<%=lx%>&tj=<%=tj%>&Page=<%=Page-1%>></a>上一页</a>|<a href=score.asp?lx=<%=lx%>&tj=<%=tj%>&Page=<%=Page+1%>>下一页</a>|<a href=score.asp?lx=<%=lx%>&tj=<%=tj%>&Page=<%=rs.PageCount%>>最后一页</a>|</div></td>
<%end if%></td>
</tr>
</table></td>
</tr>
<tr>
<td height="4"><img src="img/td.gif" width="572" height="4"></td>
</tr>
</table></td>
</tr><%rs.close
set rs=nothing
end if%>
<tr background="IMG/topbg.gif">
<td colspan="3"><%call footer()%></td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -