📄 pc_cs_detail.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="const.asp" -->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>班级管理</title>
<link href="img/Style.css" rel="stylesheet" type="text/css" />
<style type="text/css">
<!--
.style2 {color: #FFFFFF}
-->
</style>
</head>
<body>
<p>
<%
user_no = safeChar(trim(Request("user_no")))
t_month = safeChar(trim(Request("t_month")))
if user_no="" or ( not t_month="fir" and not t_month="sed") then
Response.Write("<li>参数非法</li>")
response.End()
end if
if t_month="fir" then
x_y=0
else
x_y=1
end if
Set rs1= Server.CreateObject("ADODB.Recordset")
rs1.ActiveConnection = dbconn
rs1.Source = "select month,month_name from set_month where isok=1 and isterm="&x_y&""
rs1.CursorType = 0
rs1.CursorLocation = 2
rs1.LockType = 1
rs1.Open()
str=" "
do while not rs1.eof
str=str&"m"&rs1(0)&"_finmark,"
rs1.movenext
loop
rs1.movefirst
sql="select user_no,user_name,"&str&t_month&"_spe_mark,"&t_month&"_spe_reason,"&t_month&"term_mark from pc_user where user_no='"&user_no&"'"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.ActiveConnection = dbconn
rs.Source = sql
rs.CursorType = 0
rs.CursorLocation = 2
rs.LockType = 1
rs.Open()
if not err.number="0" or rs.eof then
response.Write("<li>参数非法</li>")
else
%>
</p>
<p> </p>
<table width="80%" border="0" align="center" cellpadding="2" cellspacing="1" class="atable1">
<tr bordercolor="#D4D0C8" bgcolor="#333">
<td class="style2"><div align="left">学号：[ <%=rs(0)%> ] => 姓名：[ <%=rs(1)%> ] =〉
<%if t_month="fir" then Response.Write("上学期") else response.Write("下学期") end if %>
</div></td>
</tr>
<tr bordercolor="#D4D0C8" class="tdmenu">
<td align="center" valign="middle" class="jushe">月份 得分</td>
</tr>
<tr bordercolor="#D4D0C8" class="tdmenu">
<td align="center" valign="middle">
<%
i=2
do while not rs1.eof and not rs.eof
%>
<%=rs1(1)%>
<span class="hei"> <%=rs(i)%></span><br/>
<%i=i+1
rs1.movenext
loop%></td>
</tr>
<tr bordercolor="#D4D0C8" class="tdmenu">
<td align="center" valign="middle"><span class="jushe">特加分：</span><span class="hei"><%=rs(i)%> </span><span class="jushe"> 理由:</span><span class="hei"><%=rs(i+1)%> </span><span class="jushe"><br />
<br />
总分:</span><span class="hei"><strong> <%=rs(i+2)%><br />
</strong></span></td>
</tr>
</table>
<%end if
rs.close
set rs=nothing
rs1.close
set rs1=nothing
%>
</body>
</html>
<%dbconn.close%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -