📄 list.asp
字号:
<!--#include file="../../System/Const.asp"-->
<!--#include file="../../System/misc.asp"-->
<%
if session("usertype")<>UTP_SCHOOLADMIN and session("usertype")<>UTP_ASADMIN and session("usertype")<>UTP_ADMIN then
Response.Redirect "../system/relogin.asp?Info=你的身份检查，出现错误！"
end if
%>
<HTML>
<HEAD>
</HEAD>
<BODY bgcolor="#CDC8CF" leftmargin="0" topmargin="10" >
<!--下面包含头文件-->
<!--#include file="Header.asp"-->
<!--下面包含显示所有用户的列表-->
<table width="770" border="0" cellspacing="0" cellpadding="0" bgcolor="#FFFFFF" align="center" height="70%">
<tr>
<td bgcolor="#8C9A8C" width="3"></td>
<td width="764" bgcolor="#EFEFEF" height="20" valign="bottom"> 你现在的位置：会议室管理－会议日程表管理</td>
<td bgcolor="#8C9A8C" width="3"></td>
</tr>
<tr>
<td bgcolor="#8C9A8C" width="3" height="15"></td>
<td width="764" height="15"> </td>
<td bgcolor="#8C9A8C" width="3" height="15"></td>
</tr>
<tr>
<td bgcolor="#8C9A8C" width="3"></td>
<td width="764" valign="top">
<table class=unnamed1 border=0 cellspacing="1" cellpadding="5" bgcolor="C1C8C1" align="center" width="716" >
<tr valign=center bgcolor="#E3E3E3">
<td colspan="6" class="unnamed1"><b>会议室: <%=request("class_name")%></b></td>
</tr>
<tr valign=center bgcolor="#E3E3E3">
<td width="167" class="unnamed1"><b>会议日程名</b></td>
<td width="116" class="unnamed1"><b>开始时间</b></td>
<td width="115" class="unnamed1"><b>结束时间</b></td>
<td width="185" class="unnamed1"><b>备注</b></td>
<td width="35" class="unnamed1">
<div align="center"><b>修改 </b></div>
</td>
<td width="31" class="unnamed1">
<div align="center"><b>删除 </b></div>
</td>
</tr>
<%
set cn=server.CreateObject("ADODB.connection")
cn.Open DSN_ACLASS
set rs=server.CreateObject("ADODB.recordset")
sql="select * from COURSE where CID="&request("class_id")&" order by name"
'response.write sql
'response.end
rs.Open sql,cn,adOpenStatic
while not rs.eof
%>
<tr bgcolor="EFEFEF">
<td width="167" class="unnamed1"><%=rs("NAME")%></td>
<td width="116" class="unnamed1"><%=SimpleTime(rs("START_TIME"))%></td>
<td width="115" class="unnamed1"><%=SimpleTime(rs("END_TIME"))%></td>
<td width="185" class="unnamed1"> <%=rs("REMARK")%></td>
<td width="35" class="unnamed1">
<div align="center"><a href="edit.asp?class_id=<%=request("class_id")%>&class_name=<%=request("class_name")%>&course_id=<%=rs("ID")%>">修改</a>
</div>
</td>
<td width="31" class="unnamed1">
<div align="center"><a href="delete.asp?class_id=<%=request("class_id")%>&class_name=<%=request("class_name")%>&course_ID=<%=rs("ID")%>">删除</a>
</div>
</td>
</tr>
<%
rs.movenext
wend
%>
</table>
<p> </p><div align="center">
<form name="formAdd" method="post"></form>
<input type="button" name="Add" value="添加会议日程" onClick="vbscript:OnAdd">
<input type="button" name="Return" value="返 回" onClick="vbscript:OnReturn">
</div>
</td>
<td bgcolor="#8C9A8C" width="3"></td>
</tr>
<tr>
<td bgcolor="#8C9A8C" width="3" height="21"></td>
<td width="764" bgcolor="EFEFEF" height="21">
<div align="center"><%=COMPANY%></div>
</td>
<td bgcolor="#8C9A8C" width="3" height="21"></td>
</tr>
</table>
<table width="770" border="0" cellspacing="0" cellpadding="0" bgcolor="#8C9A8C" align="center">
<tr>
<td height="4"></td>
</tr>
</table>
<SCRIPT LANGUAGE=vbscript>
sub OnReturn
document.forms("formAdd").action="../class/list.asp"
document.forms("formAdd").submit()
end sub
sub OnAdd
document.forms("formAdd").action="add.asp?class_id=<%=request("class_id")%>&class_name=<%=request("class_name")%>"
document.forms("formAdd").submit()
end sub
</SCRIPT>
</BODY>
</HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -