?? notfullcourse.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" -->
<br>
<table width="604" height="119" border="0" bordercolor="#000000" class="table_small">
<tr class="text_title">
<td colspan="7" bordercolor="#FF9933" background="image/type_bg.gif"> </td>
</tr>
<tr class="text_title" background="image/type_bg.gif">
<td width="100" bordercolor="#66CCFF" background="image/new-icon-blue.gif"><div align="left" class="STYLE3">課程名稱</div></td>
<td width="79" bordercolor="#FF9933" background="image/new-icon-blue.gif"><div align="left" class="STYLE3">任課老師</div></td>
<td width="103" bordercolor="#FF9933" background="image/new-icon-blue.gif"><div align="left" class="STYLE3">課時</div></td>
<td width="62" bordercolor="#FF9933" background="image/new-icon-blue.gif"><span class="STYLE3">班級</span></td>
<td width="72" bordercolor="#FF9933" background="image/new-icon-blue.gif"><span class="STYLE3">星期</span></td>
<td width="84" bordercolor="#FF9933" background="image/new-icon-blue.gif">時間</td>
<td width="70" 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>
<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"><div align="left"><a href="classview.asp?cno=<%= rs_course("cno") %>&csno=<%=rs_course("id")%>"><%= rs_course("classdesc") %></a></div></td>
<td bgcolor="#CCFFFF" class="text"><%=rs_course("cday")%></td>
<td bgcolor="#CCFFFF" class="text"><%=rs_course("cctime")%>點--<%=rs_course("cctime")+2%>點</td>
<td class="text">
<div align="left"><a href="preengage.asp?cno=<%=rs_course("cno")%>&csno=<%=rs_course("id")%>">選修該課</a> </div></td>
</tr>
<%
rs_course.movenext
wend
%>
<tr>
<td colspan="7" class="text"> </td>
</tr>
<tr>
<td colspan="7" class="text_error"><div align="left">
<blockquote>
<div align="center">●點擊課程預選操作即可進行課程預選</div>
</blockquote>
</div></td>
</tr>
<%else%>
<tr>
<td colspan="7" class="text STYLE1">沒有課程可以查看</td>
</tr>
</table>
<%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 + -