📄 index.asp
字号:
<%
If Session("user_type")<>"T" Then
Response.Redirect "../../../../index.asp"
End If
%>
<!--#INCLUDE FILE="../../../system/odbc_connection.asp"-->
<HTML>
<HEAD>
<TITLE> 学生详情 </TITLE>
<link rel="stylesheet" href="../../../system/all.css">
</HEAD>
<BODY >
<h4 align="left">  学生详情</h4>
<%
dim lesson_id,rs,sql
lesson_id=request.querystring("lesson_id")
%>
<center>
<TABLE border="0" width="95%">
<tr>
<td style="background-color:#FFFFFF">学生列表</td>
<td colspan="5" align="right" style="background-color:#FFFFFF"><a href="permit_all.asp?lesson_id=<%=lesson_id%>">全部批准</a>  <a href="nopermit_all.asp?lesson_id=<%=lesson_id%>">全部撤消</a>    <a href="../users/index.asp"><<返回</a></caption></td>
</tr>
<Tr bgcolor=#E9E9E9 align="center">
<TD width=20%>学号</TD>
<TD width=20%>姓名</TD>
<TD width=20%>学生类型</TD>
<TD width=20%>批准否</TD>
<TD width=20% colspan=2>操作</TD>
</Tr>
<%
SQL="select distinct user_lesson.id,student.user_id,student.user_name,student.email,user_lesson.user_type,user_lesson.permit from user_lesson,student"
sql=sql+" where user_lesson.lesson_id = '" & lesson_id & "'"
sql=sql+" and user_lesson.user_id=student.user_id"
sql=sql & " order by user_lesson.user_type desc,student.user_id"
SET RS=db.EXECUTE(SQL)
do while not rs.eof
response.write "<tr bgcolor=#E9E9E9 align='center'>"
response.write "<td><a href='particular.ASP?user_id=" & rs("user_id") & "' target=new>"& rs("user_id") & "</a></td>"
If rs("user_name")="过客" Then
response.write "<td><font color=red>"& rs("user_name") & "</font></td>"
else
response.write "<td>"& rs("user_name") & "</td>"
End If
if rs("user_type")="S" then
response.write "<td>正式</td>"
elseif rs("user_type")="SP" then
response.write "<td>往届</td>"
else
response.write "<td>旁听</td>"
end if
if rs("permit")=1 then
response.write "<td>√</td>"
response.write "<td><a href='nopermit.asp?id=" & rs("id") & "&lesson_id=" & lesson_id & "'>撤消批准</a></td>"
else
response.write "<td></td>"
response.write "<td><a href='permit.asp?id=" & rs("id") & "&lesson_id=" & lesson_id & "'>批准</a></td>"
end if
if rs("user_id")<>"guest" then
response.write "<td><a href='delete.asp?user_id=" & rs("user_id") & "&lesson_id=" & lesson_id & "'>删除</a></td>"
response.write "</tr>"
else
response.write "<td> </td>"
end if
rs.movenext
loop
%>
</table>
</CENTER>
<p align=center class=zhushi>如果撤消过客用户，则过客不可以访问了
<p>
</BODY>
</HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -