📄 editequipment.asp
字号:
<!--#include file="include/sqlstr.asp"-->
<!--#include file="include/bgsub.asp"-->
<!--#include file="include/opendb.asp"-->
<!--#include file="include/checked.asp"-->
<!--#include file="include/keepformat.asp"-->
<%
'-----------------------------------------
oabusyname=request.cookies("oabusyname")
oabusysuid=request.cookies("oabusysuid")
oabusyuserdept=request.cookies("oabusyuserdept")
oabusyuserlevel=request.cookies("oabusyuserlevel")
if oabusysuid="" then response.redirect "default.asp"
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<link rel="stylesheet" href="css/css.css" type="text/css">
<script language="javascript1.2" src="js/openwin.js"></script>
<title>企业办公系统</title>
</head>
<body bgcolor="#ffffff" topmargin="5" leftmargin="5">
<% call bghead() %>
<center><b>资源预约详细信息</b></center>
<%
call bgmid()
%>
<center>
<%
set conn=opendb()
id=request("id")
if request("did")<>"" then
sql="delete from booking where id="&request("did")
conn.execute sql
end if
if request("submit")="删除" then
sql="delete from equipment where id="&id&_
" delete from booking where equipment="&id
conn.execute sql
%>
<br>成功删除公用资源！<br><br>
<form method="post" action="booking.asp">
<input type="submit" value="返回">
</form>
<%
else
set rs=server.createobject("adodb.recordset")
sql="select a.*,b.userdept,b.name from equipment a left join a_userinf b on a.controller=b.suid where a.id=" & id
rs.open sql,conn,1
if not rs.bof and not rs.eof then
%>
<table border="1" cellspacing="0" cellpadding="0" width=100%>
<tr><td width=20%><b>预约使用资源名称：</b></td><td><%=rs("equipment")%></td></tr>
<tr><td><b>资源维护或管理员：</b></td><td>部门：<%=rs("userdept")%> 人员：<%=rs("name")%></td></tr>
<tr><td height=100 valign=top><b>说明：</b></td><td valign=top><%=keepformat(rs("remark"))%> </td></tr>
</table>
<table border="1" cellspacing="0" cellpadding="0" width="100%">
<%
'读出预约数据
set rs1=server.createobject("adodb.recordset")
sql="select a.*,b.userdept,b.name from booking a left join a_userinf b on a.suid=b.suid where equipment=" & id & " order by starttime"
rs1.open sql,conn,1
while not rs1.eof and not rs1.bof
response.Write "<tr><td height=30>"
%>
<a href="editbooking.asp?id=<%=rs1("id")%>"><font color="#0000ff">[<%=rs1("starttime")%>----<%=rs1("endtime")%>]</font></a>
<% if rs1("suid")=oabusysuid then response.Write "<font color=red>"%>
部门：<%=rs1("userdept")%> 预约者：<%=rs1("name")%>
<%
if oabusysuid=rs1("suid") or rs("controller")=oabusysuid then
response.write "</font>"
response.Write " <a href='editequipment.asp?id="&id&"&did="&rs1("id")&"' onclick=""javascript:return window.confirm('你确定要删除此预约吗？');"">"
response.write "<img src=images/del.gif border=0></a> "
end if
response.Write "</td></tr>"
rs1.movenext
wend
end if
%>
</table>
<form method="post" action="editbooking.asp">
<input type="button" value="返回" onclick="window.location.href='booking.asp'">
<%if rs("controller")=oabusysuid then%>
<input type="submit" name="submit" value="删除" onclick="return window.confirm('你确定要删除此公用资源和它的所有预约吗？')">
<input type="hidden" name="id" value=<%=id%>>
<%end if%>
</form>
<%
end if
%>
</center>
<%
bgback()
%>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -