📄 jskechengprintok.asp
字号:
<!--#include file="connection.asp"-->
<html>
<head>
<title>打印专业课表</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css">
<!--
body {
background-color: #FBC2AD;
}
-->
</style>
</head>
<%
Response.ContentType ="application/msword"
response.AddHeader "content-disposition","inline: filename=report.doc"
%>
<%
user=session("user")
lb=session("lb")
if user=""or lb<>"teacher" then
response.redirect"index.asp"
else
xino=request.QueryString("xino")
zhuanyeno=request.QueryString("zy")
xueqi=request.QueryString("xq")
sqlstr="select 课程表.*,系.xiname,专业.zhuanye,教师.teachername,课程.lessonname from 课程表,系,专业,教师,课程 where 课程表.xino='" & xino & "' and 课程表.zhuanyeno='" & zhuanyeno &"' and 课程表.xueqi='" & xueqi &"' and 课程表.xino=系.xino and 课程表.zhuanyeno=专业.zhuanyeno and 课程表.teacherno=教师.teacherno and 课程表.lessonno=课程.lessonno"
set rs=Server.CreateObject("ADODB.Recordset")
rs.open sqlstr,CN,1,1
' response.write sqlstr
'response.end
if rs.eof then
response.writre "还没有课程表信息！"
response.end
else
%>
<body>
<p align="center"><font size="6">
<table width="935" height="70" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#000000" bgcolor="#D4D0C8">
<tr class="but">
<td width="75" height="30" align="right" class="but01"><div align="center">所在系部</div></td>
<td width="82" align="left " class="but01" ><div align="center">所在专业</div></td>
<td width="42" align="left " class="but01" ><div align="center">年级</div></td>
<td width="39" align="left " class="but01" ><div align="center">班级</div></td>
<td width="54" align="left " class="but01" ><div align="center">课程</div></td>
<td width="52" align="left " class="but01" ><div align="center">任课教师</div></td>
<td width="63" align="left " class="but01" ><div align="center">学期</div></td>
<td width="34" align="left " class="but01" ><div align="center">学分</div></td>
<td width="58" align="left " class="but01" ><div align="center">每周上课</div></td>
<td width="46" align="left " class="but01" ><div align="center">周次</div></td>
<td width="59" align="left " class="but01" ><div align="center">节次</div></td>
<td width="59" align="left " class="but01" ><div align="center">课程类型</div></td>
<td width="59" align="left " class="but01" ><div align="center">教室</div></td>
</tr>
<%
while not rs.eof
%>
<tr bgcolor="#FFFFF4">
<td height="31" align="right" ><div align="center">
<% response.write(RS("xiname"))%>
</div></td>
<td >
<div align="center">
<% response.write(RS("zhuanye"))%>
</div></td>
<td >
<div align="center">
<% response.write(RS("jino"))%>
</div></td>
<td>
<div align="center">
<% response.write(RS("banno"))%>
</div></td>
<td>
<div align="center">
<%=RS("lessonname")%> </div></td>
<td ><div align="center">
<% response.write(RS("teachername"))%>
</div></td>
<td ><div align="center">
<% response.write(RS("xueqi"))%>
</div></td>
<td ><div align="center"><% response.write(RS("xuefen"))%></div></td>
<td >
<div align="center">
<% response.write(RS("everyweek"))%>
</div></td>
<td >
<div align="center">
<% response.write(RS("week"))%>
</div></td>
<td ><div align="center"><% response.write(RS("jieci"))%></div></td>
<td ><div align="center"><% response.write(RS("lessontype"))%></div></td>
<td ><div align="center"><% response.write(RS("classroom"))%></div></td>
</tr>
<%
RS.movenext
wend
%>
</table>
<%
end if
end if
%>
</body>
<%
rs.close
set rs=nothing
response.flush
response.end
%>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -