📄 cx_subject.asp
字号:
<!--#include file="conn.asp"-->
<%
if session("username")="" then
response.redirect "relogin.asp"
end if
%><html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>成绩查询</title>
<link rel="stylesheet" type="text/css" href="css.css">
</head>
<body>
<table border="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber1">
<tr>
<td width="100%" height="30" style="border-left-style: solid; border-left-width: 0; border-right-style: solid; border-right-width: 0; border-top-style: solid; border-top-width: 0; border-bottom: 1px solid #000000">
<img border="0" src="images/cxcj.gif"></td>
</tr>
</table>
<%
username=request.cookies("username")
sql1="SELECT distinct kcid FROM tbscore WHERE username='"&username&"'"
set rs1=server.createobject("adodb.recordset")
rs1.open sql1,conn,3,2
if rs1.eof then
%><table border="0" cellspacing="0" bordercolor="#111111" width="480">
<tr>
<td width="100%" height="30">
<p align="center"> 现在您还没有相关的考试成绩！！！ </td>
</tr>
</table>
<%
else
%><br>
<center>
<table border="1" cellspacing="1" style="border-collapse: collapse" id="AutoNumber2" width="480" cellpadding="0" height="63" bordercolor="#799AE1">
<tr class="trh">
<td height="25" width="33" bgcolor="#799AE1" bordercolor="#799AE1"></td>
<td bgcolor="#799AE1" width="161" height="25" bordercolor="#799AE1">
<p align="center"><font color="#FFFFFF"> <b>科目名称</b></font></td>
<td bgcolor="#799AE1" width="175" colspan="2" height="25" bordercolor="#799AE1">
<p align="center"><font color="#FFFFFF">考试部分</font></td>
<td bgcolor="#799AE1" width="75" height="25" bordercolor="#799AE1">
<p align="center"><font color="#FFFFFF">练习部分</font></td>
</tr>
<%
i=1
'----列出考试科目
for k = 0 to rs1.recordcount-1
kcid=rs1("kcid")
sql3="SELECT * from tbkc where kcid="&kcid
set rs3=server.createobject("adodb.recordset")
rs3.open sql3,conn,3,2
%>
<tr class="trh1">
<td align="center" height="33" width="33" bordercolor="#799AE1" ><%=i%></td>
<td width="161" height="33" bordercolor="#799AE1">
<p align="center"><%=rs3("kcm")%></td>
<td width="86" height="33" bordercolor="#799AE1">
<p align="center"><%
sql4="SELECT * from tbscore where kcid="&kcid&" and username='"&username&"'"
set rs4=server.createobject("adodb.recordset")
rs4.open sql4,conn,3,2
do while not rs4.eof
sql5="SELECT * from tbpaper where paperno="&rs4("paperno")
set rs5=server.createobject("adodb.recordset")
rs5.open sql5,conn,3,2
%><%=rs5("info")%><br>
<%
rs5.close
rs4.movenext
loop
rs4.close
%></td>
<td width="82" height="33" bordercolor="#799AE1"><p align="center"><%
sql4="SELECT * from tbscore where kcid="&kcid&" and username='"&username&"'"
set rs4=server.createobject("adodb.recordset")
rs4.open sql4,conn,3,2
do while not rs4.eof
if rs4("isexam")=0 then
response.write "尚未考试<br>"
else
if islook=0 then
if rs4("isadmin")=0 then
response.write "尚未批改<br>"
else
%><a href="cx_ks_type.asp?kcid=<%=rs3("kcid")%>&paperno=<%=rs4("paperno")%>">考试成绩</a><br>
<%
end if
else %><a href="cx_ks_type.asp?kcid=<%=rs3("kcid")%>&paperno=<%=rs4("paperno")%>">考试成绩</a><br>
<%
end if
end if
rs4.movenext
loop
rs4.close
%></td>
<td width="75" height="33" bordercolor="#799AE1">
<p align="center"><a href="cx_chapter.asp?kcid=<%=rs3("kcid")%>">练习成绩</a></td>
</tr>
<%
i=i+1
rs1.movenext
next
end if
%>
</table>
</center>
<p align="center"> </p>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -