📄 show.asp
字号:
<!--#include file="../database/opendb.asp"-->
<%
'实现页面运行时间记录
dim startime
startime=timer()
%>
<%
'-------------------------
Function mysql(myweek,mytime)
'得到对应的SQL语句
mysql="select * from course where week=" & myweek & " and " & "begin_time=" & mytime &" order by begin_week asc" '还要记住以开始周为排序,查询该节课时间段内的课程记录
End Function
%>
<%
Function drawmyselect(i,j)
'//先计算出是第几天的第几节课
myweek=i mod 5
if myweek=0 then
myweek=5 '若能除尽,说明是周五
end if
mytime=j'节号直接传入
'//下面先获得查询语句
sql=mysql(myweek,mytime)
'下面开始查询
rst.Open sql,my_conn,3,2 '得到搜索后的记录
'//下面开始输出:构建输出的字符串
dim answerstring
if not rst.EOF and not rst.BOF then
do while not rst.eof
'------------------------------
answerstring=answerstring & "<br>"& "<input type=checkbox " & " name=" & i & " value="&rst("ID")&">"& rst("begin_week")&"-"&rst("end_week")&"周:"& rst("name")&"||" & rst("other")
'------------------------------
rst.movenext
loop
else'若该时间没有课程
answerstring=" "
end if
'//---------------
'关闭数据库记录集
rst.close
drawmyselect=answerstring '返回select字符串
End Function
%>
<!----------------------下面是htm文档-------------------------->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<!--#include file="../bg/css.asp"-->
</head>
<body topmargin="0" leftmargin="0">
<form action="../maketimetable/make.asp" method="post">
<table border="1" align="center" cellpadding="0" cellspacing="0">
<!--------------------表头------------------------->
<tr bgcolor="#FFFF66">
<td colspan="6"><div align="center" ><input type="button" onclick="location.href='help.asp'"; value="使用帮助"><input type="submit" value="生成课表"></div></td>
</tr>
<tr bgcolor="#6699FF">
<td ><div align="center" class="style1">节</div></td>
<td ><div align="center" class="style1">周一</div></td>
<td ><div align="center" class="style1">周二</div></td>
<td ><div align="center" class="style1">周三</div></td>
<td ><div align="center" class="style1">周四</div></td>
<td ><div align="center" class="style1">周五</div></td>
</tr>
<!---------------------下面开始绘制表格------------------------>
<%
j=0'行号,其实就是节的编号
for i=1 to 70
if i mod 5=1 then
j=j+1 '行号开始计数
response.write "<tr>" '行起始
response.write "<td bgcolor='#99FF66' class=""style1""><div align='center' >" &j&"</div></td>"'行号
end if
response.write "<td class=""style2"">"& drawmyselect(i,j) &"</td>"'绘制表格,我们将在这些表格内填入对应时间段的select
if i mod 5=0 then
response.write "</tr>" '行结束
end if
next
'//---------------
'//最后关闭数据库
my_conn.close
set my_conn=nothing
%>
</table>
</form>
</body>
</html>
<%
'-------------------
dim endtime
endtime=timer()
%>
<br ><span class="style1">页面执行时间：<%=FormatNumber((endtime-startime)*1000,3)%>毫秒</span>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -