cj_body.asp

职业培训学校学生档案成绩费用管理系统V1.0免费版.rar

<%
sub cj_body(user_number)
set rs=server.createobject("adodb.recordset")
sql="select * from st_info where user_number='"&user_number&"'"
rs.open sql,conn,1,1
session("user_number")=rs("user_number")
session("user_name")=rs("user_name")
rs.close
set rs=nothing
set rs=server.createobject("adodb.recordset")
sql="select * from ach where user_number='"&user_number&"'"
rs.open sql,conn,1,1
%>
<div align="center"> 
  <table border="1" width="700" bordercolorlight="#000000" cellspacing="0" cellpadding="4" bordercolordark="#FFFFFF">
    <tr>
	  <td width="100" align="center">学号</td>
      <td width="50" align="center">姓名</td>
      <td width="70" align="center">考试时间</td>
      <td width="200" align="center">考试科目</td>
      <td width="50" align="center">考试成绩</td>
      <td width="50" align="center">修改</td>
      <td width="50" align="center">删除</td>
      <td width="50" align="center">添加</td>
    </tr>
    <%
	if not rs.eof then
	do while not rs.eof
    %>
    <tr>
	  <td width="100" align="center"><%=rs("user_number")%></td>
      <td width="50" align="center"><%=rs("user_name")%></td>
      <td width="70" align="center"><%=rs("test_data")%></td>
      <td width="200" align="center"><%=rs("subject")%></td>
      <td width="50" align="center"><%=rs("ach")%></td>
      <td width="50" align="center"><a href="mod_chengji.asp?id=<%=rs("id")%>&key=1">修改</a></td>
      <td width="50" align="center"><a href=javascript:if(confirm('确实要删除吗?'))location='del_chengji.asp?id=<%=rs("id")%>&key=1'>删除</a></td>
	 <td width="50" align="center"><a href="add_chengji.asp?key=1">添加</a></td>	  
    </tr>
    <%
	rs.movenext
	loop
	else
	%>
    <tr>
      <td colspan="7"><marquee>
        暂无情况添加
      </marquee></td>
	 <td width="50" align="center"><a href="add_chengji.asp?key=1">添加</a></td>	 
    </tr>
  </table>
</div>  
<%
end if
rs.close
set rs=nothing
end sub
%>