📄 meetingroomlist.asp
字号:
<!--#include file="check.asp"-->
<!--#include file="checkpower.asp"-->
<!--#INCLUDE FILE="connect.asp" -->
<html>
<head>
<title>会议室管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script language="JavaScript" src="apply.js"></script>
<link rel="stylesheet" href="apply.css" type="text/css">
</head>
<%
if Request.ServerVariables("Request_Method")="POST" then
if request("choosedel")="choosedel" then
j=request("checkbox").count
sql=request("checkbox")(1)
for i=2 to j
delid=request("checkbox")(i)
sql=sql&" or id="&delid
next
sql="delete from meetingroom where id="&sql
conn.execute(sql)
else
set rs=server.createobject("adodb.recordset")
sql="select * from meetingroom where id=1"
rs.open sql,conn,1,3
rs.addnew
rs("id")=request("roomid")
rs("roomname")=request("roomname")
rs.update
rs.close
set rs=nothing
end if
end if
%>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" oncontextmenu="return false">
<%set rs=server.createobject("adodb.recordset")
sql="select * from meetingroom"
rs.open sql,conn,1,1
%>
<form name="form" method="post" action="">
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="50">
<tr>
<td align="center" class="title"> <img src="images/systemmeeting.gif"> </td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>
<table width="90%" border="0" cellspacing="0" cellpadding="0" align="center" height="26">
<tr height=1>
<td bgcolor="#A7BAE4" height="1" colspan="4"></td>
</tr>
<tr>
<td bgcolor="#D4DEF4" valign="top">
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="26">
<tr>
<td width="30">
<input type="hidden" name="choosedel">
</td>
<td width="160">目前共有<font class="picknum"><b><%=rs.recordcount %></b></font>个会议室</td>
<td><a href="#" onClick="return checkaddroom()" class="aapply">添加会议室</a>
<a href="#" onClick="return checkdelroom()" class="aapply">删 除</a>
<a href="javascript:gosystem()" class="aapply"> 返 回</a> </td>
</tr>
</table>
</td>
</tr>
<tr height=1>
<td bgcolor="#A7BAE4" height="1" colspan="4"></td>
</tr>
</table>
<table width="90%" border="0" cellspacing="0" align="center" cellpadding="0">
<tr align="center" bgcolor="#E7ECF7">
<td height="26" width="24%">会议室编号：</td>
<td height="26" width="57%">会议室名称：</td>
<td height="26" width="19%">删 除：</td>
</tr>
<%if rs.eof then %>
<tr height="1">
<td bgcolor="#ffffff" colspan="4"><img src="images/spacer.gif" width="1" height="1"></td>
</tr>
<tr bgcolor="#F5FAFD" align="center">
<td height="26" colspan="4" class="f6wait">目前您还没有添加会议室</td>
</tr>
<tr height="1">
<td bgcolor="#D6E1F8" colspan="4"><img src="images/spacer.gif" width="1" height="1"></td>
</tr>
<%
else
dim i
i=0
while not rs.eof
response.write("<script language=javascript>id["&i&"]='"&rs("id")&"';</script>")
i=i+1
%>
<tr height="1">
<td bgcolor="#ffffff" colspan="4"><img src="images/spacer.gif" width="1" height="1"></td>
</tr>
<tr align="center" bgcolor="#F5FAFD">
<td height="26" width="24%"><%=rs("id")%></td>
<td height="26" width="57%"><%=rs("roomname")%></td>
<td height="26" width="19%">
<input type="checkbox" name="checkbox" value="<%=rs("id")%>">
</td>
</tr>
<tr height="1">
<td bgcolor="#D6E1F8" colspan="3"><img src="images/spacer.gif" width="1" height="1"></td>
</tr>
<%rs.movenext
wend
end if
%>
</table>
<table width="90%" border="0" cellspacing="0" cellpadding="0" align="center" height="26">
<tr height=1>
<td bgcolor="#A7BAE4" height="1" colspan="4"></td>
</tr>
<tr>
<td bgcolor="#D4DEF4" align="center">会议室编号：
<input type="text" name="roomid" size="10" maxlength="4">
会议室名称：
<input type="text" name="roomname" size="20" maxlength="30">
</td>
</tr>
<tr height=1>
<td bgcolor="#A7BAE4" height="1" colspan="4"></td>
</tr>
</table>
<table width="60%" border="0" cellspacing="0" cellpadding="0" align="center" height="40">
<tr>
<td >
<div align="center" class="9blue">注：会议室编号只能输入数字，位数不能超过四位，各会议室编号唯一。例如101</div>
</td>
</tr>
</table>
</td>
</tr>
</table>
</form>
<!--#include file="close.asp"-->
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -