jc_body.asp

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

<%sub jc_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")
%>
<div align="center"> 
  <table border="1" width="300" bordercolorlight="#000000" cellspacing="0" cellpadding="4" bordercolordark="#FFFFFF">
<tr>
  <td width="20%" align="center">学号</td>
  <td width="20%" align="center">姓名</td>
  <td width="20%" align="center">当前总学分</td>
</tr>
<tr>
  <td width="20%" align="center"><%=rs("user_number")%></td>
  <td width="20%" align="center"><%=rs("user_name")%></td>
  <td width="20%" align="center"><%=rs("xuefen")%></td>
</tr>
    </tr>
  </table>
</div><p>
<%
snumber=rs("user_number")
sname=rs("user_name")
rs.close
set rs=nothing
set rs=server.createobject("adodb.recordset")
sql="select * from jiangcheng 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="100" align="center">姓名</td>
      <td width="300" align="center">奖惩原因</td>
	  <td width="50" align="center">状况</td>
      <td width="50" align="center">学分</td>
      <td width="100" 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="50" align="center"><%=rs("user_number")%></td>
	  <td width="50" align="center"><%=rs("user_name")%></td>
      <td width="300" align="center"><%=rs("yuanying")%></td>
	  <%if rs("zk")=1 then%>
	  <td width="50" align="center">奖励</td>
	  <%elseif rs("zk")=0 then%>
	  <td width="50" align="center">惩罚</td>
	  <%else%>
	  <td width="50" align="center"></td>
	  <%end if%>
	  <td width="100" align="center"><%=abs(rs("user_xuefen"))%></td>
	  <td width="100" align="center"><%=rs("time")%></td>      
      <td width="50" align="center"><a href="mod_jiangcheng.asp?id=<%=rs("id")%>&key=1">修改</a></td>
      <td width="50" align="center"><a href=javascript:if(confirm('确实要删除吗?'))location='del_jiangcheng.asp?id=<%=rs("id")%>&key=1'>删除</a></td>
	  <td width="50" align="center"><a href="add_jiangcheng.asp?key=1">添加</a></td>
    </tr>
    <%
	rs.movenext
	loop
	else
	%>
    <tr>
      <td colspan="8"><marquee>暂无奖惩情况添加</marquee></td>
	  <td width="50" align="center"><a href="add_jiangcheng.asp?key=1">添加</a></td>
    </tr>
  </table>
</div>
<%
end if
rs.close
set rs=nothing
end sub
%>