📄 beginclass.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="xuanke.asp" -->
<!--#include file="include/is_user.asp" -->
<!--#include file="include/exit.asp" -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>查看课程</title>
<style type="text/css">
<!--
@import url("style.css");
.STYLE1 {color: #FF0000}
.STYLE3 {font-size: 12; }
body {
background-image: url(image/back.jpg);
}
-->
</style>
</head>
<body bgcolor="#FFFFCC">
<div align="center">
<table width="760" height="242" border="0" class="table_big">
<tr>
<td valign="top"><div align="center">
<!--#include file="include/head.asp" -->
<table width="636" height="119" border="0" bordercolor="#000000" class="table_small">
<tr class="text_title">
<td colspan="10" bordercolor="#FF9933" background="image/type_bg.gif">查看还没有选满的课题</td>
</tr>
<tr class="text_title" background="image/type_bg.gif">
<td width="108" bordercolor="#66CCFF" background="image/new-icon-blue.gif"><div align="left" class="STYLE3">课题名称</div></td>
<td width="91" bordercolor="#FF9933" background="image/new-icon-blue.gif"><div align="left" class="STYLE3">指导老师</div></td>
<td width="61" bordercolor="#FF9933" background="image/new-icon-blue.gif"><div align="left" class="STYLE3">课时</div></td>
<td width="57" bordercolor="#FF9933" background="image/new-icon-blue.gif">一志愿</td>
<td width="54" bordercolor="#FF9933" background="image/new-icon-blue.gif">二志愿</td>
<td width="50" bordercolor="#FF9933" background="image/new-icon-blue.gif">三志愿</td>
<td width="109" bordercolor="#FF9933" background="image/new-icon-blue.gif"><div align="left" class="STYLE3"><img src="image/type02.gif" width="9" height="9">操作</div></td>
</tr>
<%
'打开课程数据库------------------
set rs_course=server.CreateObject("adodb.recordset")
sql = "select b.cno,b.cname,b.c_tname,b.ctime,b.cno,b.c_beizhu,b.remarks,a.cday,a.cctime,a.classdesc,a.id from class a,course b where a.courseno=b.cno order by b.cno"
rs_course.open sql,xuanke_conn,3,2
if not(rs_course.eof or rs_course.bof) then
rs_course.movefirst
'循环显示课程信息-----------------
while (not rs_course.eof or rs_course.bof)
%>
<tr>
<form name="form1" method="post" action="preengage.asp">
<td height="20" bordercolor="#000000" bgcolor="#CCFFFF" class="text"><p align="left" title="<%=rs_course("c_beizhu")%>"><a href="coursemessage.asp?cno=<%= rs_course("cno")%>"><%= rs_course("cname") %></a></td>
<td bgcolor="#CCFFFF" class="text"><p align="left" title="<%=rs_course("remarks")%>"><%= rs_course("c_tname") %></td>
<td bgcolor="#CCFFFF" class="text"><div align="left"><%= rs_course("ctime") %></div></td>
<td bgcolor="#CCFFFF" class="text"><label>
<input type="radio" name="zhiyuan" value="1" >
</label></td>
<td bgcolor="#CCFFFF" class="text"><label>
<input type="radio" name="zhiyuan" value="2" >
</label></td>
<td bgcolor="#CCFFFF" class="text"><label>
<input type="radio" name="zhiyuan" value="3">
</label></td>
<input type="hidden" name="cno" value="<%=rs_course("cno")%>">
<input type="hidden" name="csno" value="<%=rs_course("id")%>">
<td class="text"><div align="left">
<label>
<input type="submit" name="choice" id="choice" value="选修该课题">
</label>
</div></td></form>
</tr>
<%
rs_course.movenext
wend
%>
<tr>
<td colspan="10" class="text"> </td>
</tr>
<tr>
<td colspan="10" class="text_error"><div align="left">
<blockquote>
<div align="center">●点击课题预选操作即可进行课程预选</div>
</blockquote>
</div></td>
</tr>
<%else%>
<tr>
<td colspan="10" class="text STYLE1">没有课题可以查看</td>
</tr>
</table>
<br>
<%end if%>
<br>
<!--#include file="include/foot.asp" -->
</div></td>
</tr>
</table>
</div>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -