?? 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 + -