📄 querycoursearrange.asp

📁 一个学生选棵系统的毕业论文
💻 ASP
字号:
<!--#include file="../include/keepHouse.asp"-->
<html>
<head>
<title><%=WebName%></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../include/WebCourseSettlementStyle.Css" rel="stylesheet" type="text/css">
</head>

<body>
<!--#include file="../include/header.asp"-->
<%
dim COURSE_ID
dim TEACHER_ID
COURSE_ID=request("COURSE_ID")
TEACHER_ID=request("TEACHER_ID")
COURSE_ID=Trim(request("COURSE_ID"))
TEACHER_ID=Trim(request("TEACHER_ID"))
if COURSE_ID<>"" or TEACHER_ID<>"" then
sql="select * from VIEW_Arrange"
if COURSE_ID<>"" then
	sql=sql+" where COURSE_ID='"&COURSE_ID&"'"
end if
if TEACHER_ID<>"" then
	if COURSE_ID<>"" then
		sql=sql+" and TEACHER_ID='"&TEACHER_ID&"'"
	else
		sql=sql+" where TEACHER_ID='"&TEACHER_ID&"'"
	end if
end if
	call openDB()
	'call debug(sql)
	rs.open sql,conn,1,1
	if rs.eof or rs.bof then
		response.Write "<p align='center'>对不起，编号为<font color='red'>"&COURSE_ID&"</font>的课程不存在!</p>"
	else
	%>
	<table width="750" border="1" align="center" cellpadding="0" cellspacing="0" 
	bordercolorlight="#0000dd" bordercolordark="#FFFFFF" bgcolor="#F0F0F0">
	<tr bgcolor="#99CCFF" align="center"> 
    <td colspan="13" nowrap><font size='+1' face='黑体'><strong>课 程 查 询 结 果</strong></font></td>
    </tr>
    <tr bgcolor="#99CCFF"> 
    <td width="39" nowrap><strong>课程号</strong></td>
    <td width="61" nowrap><strong>课程名</strong></td>
    <td width="49" nowrap><strong>教师号</strong></td>
    <td width="47" nowrap><strong>教师名</strong></td>
    <td width="49" nowrap><strong>开课<br>
    部门</strong></td>
    <td width="33" nowrap><strong>课程<br>
    性质</strong></td>
    <td width="21" nowrap><strong>学<br>
    分</strong></td>
    <td width="35" nowrap><strong>考察<br>
    方式</strong></td>
    <td width="85" nowrap><strong>面向<br>
    专业号</strong></td>
    <td width="29" nowrap><strong>最大<br>
    人数</strong></td>
    <td width="118" nowrap><strong>上课地点</strong></td>
    <td width="62" nowrap><strong>教室性质</strong></td>
    <td width="78" nowrap><strong>上课时间</strong></td>
    </tr>
    <%
    while not rs.eof
    	%>
    	<tr bgcolor="#F0F0F0"> 
    	<td nowrap><font color=red><%=rs("COURSE_ID")%></font></td>
    	<td nowrap><font color=red><%=rs("COURSE_NAME")%></font></td>
    	<td nowrap><font color=red><%=rs("TEACHER_ID")%></font></td>
    	<td nowrap><font color=red><%=rs("TEACHER_NAME")%></font></td>
    	<td nowrap><font color=red><%=rs("DEPT_NAME")%></font></td>
    	<td nowrap><font color=red><%=rs("SELECT_LIMIT")%></font></td>
    	<td nowrap><font color=red><%=rs("SCORE")%></font></td>
    	<td nowrap><font color=red><%=rs("TEST_METHOD")%></font></td>
    	<td nowrap><font color=red><%=rs("ORIENT_DEPT_ID")%></font></td>
    	<td nowrap><font color=red><%=rs("SELECTOR_NO_LIMIT")%></font></td>
    	<td nowrap><font color=red><%=rs("BUILDING_NAME")&rs("CLASSROOM_NAME")%></font></td>
    	<td nowrap><font color=red><%=rs("CLASSROOM_PROPERTY")%></font></td>
    	<td nowrap><font color=red><%=rs("DAY_TIME")%></font></td>
  		</tr>
		<%
		rs.movenext
	wend
	rs.close
end if
call closeDB()
%>
</table>
<br>
<%
end if

server.Execute("formQueryCourseArrange.asp")
%>
<!--#include file="../include/footer.asp"-->
</body>
</html>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -