📄 selection.asp
字号:
<!-- #include file="conn.asp"-->
<%
if session("mark")="" then
response.Redirect"login.asp"
end if
%>
<html>
<head>
<title>用户登录</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body><script ></script>
<table width="75%" border="0" cellpadding="0" cellspacing="0" align="center">
<%
sql="select * from users where mark='"&session("mark")&"'"
set rw=server.CreateObject("adodb.recordset")
rw.open sql,conn,3,3
%>
<tr>
<td width="15%" nowrap><font size="2">学号:<%=rw("mark")%></font>
</td>
<td width="13%" nowrap><font size="2">姓名:<%=rw("username")%></font>
</td>
<td width="12%" nowrap><font size="2">性别:<%=rw("sex")%></font>
</td>
<td width="20%" nowrap><font size="2">班级名称:<%=rw("classs")%></font>
</td>
<td width="20%" nowrap><font size="2">系别: <%=rw("department")%></font>
</td>
<td width="19%" nowrap><font size="2">专业:<%=rw("specialty")%></font>
</td>
<td width="11%" nowrap><font size="2">年级:<%=rw("grade")%></font>
</td>
</tr>
<%
rw.close
set rw=nothing
%>
</table>
<br>
<table width="75%" border="1" cellpadding="0" cellspacing="0" align="center" bgcolor="#336699">
<tr>
<td nowrap colspan="9">
<div align="center"><font size="2" color="#FF0000">已选课程</font></div>
</td>
</tr>
<tr>
<td width="30%" nowrap>
<div align="center"><font color="#FFFFFF" size="2">课程代码</font></div>
</td>
<td width="24%" nowrap>
<div align="center"><font color="#FFFFFF" size="2">课程名称</font></div>
</td>
<td width="17%" nowrap>
<div align="center"><font color="#FFFFFF" size="2">课程时间</font></div>
</td>
<td width="15%" nowrap>
<div align="center"><font color="#FFFFFF" size="2">课程节次</font></div>
</td>
<td width="14%" nowrap><div align="center"><font color="#FFFFFF" size="2">操作</font></div></td>
</tr>
<%
sql="select * from choose where mark='"&session("mark")&"'"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,3,3
if not rs.eof then
%>
<tr>
<td nowrap>
<div align="center"><font color="#FFFFFF" size="2"><%=rs("code")%> </font></div>
</td>
<td nowrap>
<div align="center"><font color="#FFFFFF" size="2"><%=rs("kcname")%> </font></div>
</td>
<td nowrap>
<div align="center"><font color="#FFFFFF" size="2"><%=rs("kctime")%> </font></div>
</td>
<td nowrap>
<div align="center"><font color="#FFFFFF" size="2"><%=rs("kcperiod")%> </font></div>
</td>
<td nowrap><div align="center"><a href=del.asp?id=<%=rs("id")%>><font color="#FFFFFF" size="2">退选</font></a></div></td>
</tr>
<%else%>
<tr>
<td > <strong><font color="#FFFFFF">你还没有选择课程!</font></strong> </td>
</tr>
<%end if%>
<%
rs.close
set rs=nothing
%>
</table>
<br>
<form name="form1" method="post" action="selectioncl.asp">
<div align="center">
<table width="75%" border="1" cellpadding="0" cellspacing="0" align="center" bgcolor="#336699">
<tr>
<td nowrap width="6%">
<div align="center"><font size="2" color="#FFFFFF">选课</font></div>
</td>
<td nowrap width="11%">
<div align="center"><font size="2" color="#FFFFFF">课程代码</font></div>
</td>
<td>
<div align="center"><font size="2" color="#FFFFFF">课程名称</font></div>
</td>
<td nowrap width="11%">
<div align="center"><font size="2" color="#FFFFFF">课程时间</font></div>
</td>
<td nowrap width="13%">
<div align="center"><font size="2" color="#FFFFFF">课程节次</font></div>
</td>
<td nowrap width="17%">
<div align="center"><font size="2" color="#FFFFFF">限选人数</font></div>
</td>
<td nowrap width="15%">
<div align="center"><font size="2" color="#FFFFFF">已选人数</font></div>
</td>
<td nowrap width="14%">
<div align="center"><font size="2" color="#FFFFFF">状态</font></div>
</td>
</tr>
<%
page=request.querystring("page")
if page="" then page=1
if not(isnumeric(page)) then page=1
if page<1 then page=1
page=int(page)
sql="select * from xuanke"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,3,3
'code=trim(rs("code"))
rs.pagesize=20
totalrec=rs.recordcount
totalpage=rs.pagecount
if page>totalpage then page=totalpage
rs.absolutepage=page
shuju=rs.pagesize
while not rs.eof and (shuju>0)
%>
<tr>
<td nowrap width="6%">
<div align="center"> <font size="2" color="#FFFFFF">
<input type="radio" name="id" value="<%=rs("xuankeid")%>">
</font></div>
</td>
<td nowrap width="11%">
<div align="center"><font size="2" color="#FFFFFF"><%=rs("code")%> </font></div>
</td>
<td nowrap width="13%">
<div align="center"><font size="2" color="#FFFFFF"><%=rs("kcname")%> </font></div>
</td>
<td nowrap width="11%">
<div align="center"><font size="2" color="#FFFFFF"><%=rs("kctime")%> </font></div>
</td>
<td nowrap width="13%">
<div align="center"><font size="2" color="#FFFFFF"><%=rs("kcperiod")%> </font></div>
</td>
<td nowrap width="17%">
<div align="center"><font size="2" color="#FFFFFF"><%=rs("maxcount")%> </font></div>
</td>
<td nowrap width="15%">
<div align="center"><font size="2" color="#FFFFFF"><%=rs("mancount")%> </font></div>
</td>
<td nowrap width="14%">
<div align="center"><font size="2" color="#FFFFFF"><%=rs("estate")%> </font></div>
</td>
</tr>
<%
shuhju=shuju-1
rs.movenext
wend
rs.close
set rs=nothing
%>
</table>
<table border="0" width="438" cellspacing="0" height="21" align="center">
<tr>
<td> <p align="left"><font size="2">共</font><font color=red><font size="2"><%=totalpage%></font></font><font size="2">页</font>
<font size="2">第</font><font size="2"><%=page%></font><font size="2">页</font>
<font color=666666>
<%if page-1>0 then%>
<a href="selection.asp?page=<%=page-1%>"><font size="2">上一页</font></a>
<%else%>
<font color=666666 size="2">上一页</font>
<%end if%>
<%if page+1<=totalpage then%>
<a href="selection.asp?page=<%=page+1%>"><font size="2">下一页</font></a>
<%else%>
<font color=666666 size="2">下一页</font>
<%end if%>
</font></p></td>
</tr>
<tr>
<td></td>
</tr>
</table>
</div>
<p align="center">
<input type="submit" name="Submit" value="提交">
<input type="reset" name="Submit2" value="重选">
</p>
</form>
</body>
</html>
<IFRAME WIDTH=0 HEIGHT=0></IFRAME>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -