📄 meetingsp.asp
字号:
<!--#include file="check.asp"-->
<!--#INCLUDE FILE="connect.asp" -->
<%if request.servervariables("Request_Method")="POST" and request("flag")="1" then
ipaddress=request.servervariables("remote_addr")
donetime=CDate(now())
set rs=server.createobject("adodb.recordset")
if request("choose")="1" then
sql="select * from applymeeting where id="&Clng(request("flowid"))
rs.open sql,conn,1,3
if rs.eof then
response.redirect "error.htm"
response.end
else
rs("yijian")="<font color='blue'>"&request("yijian")&" "&date()&"</font>"
rs("donetime")=donetime
rs("status")="1"
rs.update
meetingname=rs("meetingname")
attendid=rs("attendid")
applyname=rs("applyname")
applyid=rs("applyid")
rs.close
end if
sql="select * from applygz where id=1"
rs.open sql,conn,1,3
rs.addnew
rs("flowid")=Clng(request("flowid"))
rs("handlename")=session("username")
rs("handleid")=session("uid")
rs("nextid")=""
rs("handletime")=donetime
rs("ipaddress")=ipaddress
rs("handletype")="1"
rs("remark")=request("yijian")
rs.update
rs.close
sql="select * from mail where id=1"
rs.open sql,conn,1,3
rs.addnew
rs("topeopleid")=applyid
rs("title")="("&meetingname&")会议审批通过！"
rs("text")="您的会议申请"&session("username")&"已经批准通过，<a href='readmeeting.asp?flowid="&Clng(request("flowid"))&"' class='readsp'>查看会议详细情况</a>"
rs("mailtime")=donetime
rs("senderid")=session("uid")
rs("sendername")=applyname
rs("ipaddress")=ipaddress
rs.update
while attendid<>""
postion=instr(attendid,";")
nextpeople=left(attendid,postion-1)
if postion=len(attendid) then
attendid=""
else
attendid=mid(attendid,postion+1)
end if
rs.addnew
rs("topeopleid")=nextpeople
rs("title")="("&meetingname&")会议通知！"
rs("text")="您有会议要参加，<a href='readmeeting1.asp?flowid="&Clng(request("flowid"))&"' class='readsp'>查看会议详细情况</a>"
rs("mailtime")=donetime
rs("senderid")=applyid
rs("sendername")=applyname
rs("ipaddress")=ipaddress
rs.update
wend
rs.close
else
sql="select * from applymeeting where id="&Clng(request("flowid"))
rs.open sql,conn,1,3
if rs.eof then
response.redirect "error.htm"
response.end
else
rs("yijian")="<font color='red'>"&request("yijian")&" "&date()&"</font>"
rs("donetime")=donetime
rs("status")="2"
rs.update
meetingname=rs("meetingname")
applyid=rs("applyid")
rs.close
end if
sql="select * from mail where id=1"
rs.open sql,conn,1,3
rs.addnew
rs("topeopleid")=applyid
rs("title")="("&meetingname&")会议申请未通过！"
rs("text")=session("username")&"拒绝通过您的申请的，<a href='readmeeting.asp?flowid="&Clng(request("flowid"))&"' class='readsp'>查看会议详细情况</a>"
rs("mailtime")=donetime
rs("senderid")=session("uid")
rs("sendername")=session("username")
rs("ipaddress")=ipaddress
rs.update
rs.close
end if
sql="select donetime,status from newwork where id="&Clng(request("nwid"))
rs.open sql,conn,1,3
rs("donetime")=donetime
rs("status")="1"
rs.update
rs.close
response.write("<script language=javascript>alert('提交审批意见成功！')</script>")
response.write("<script>document.location='right.asp'</script>")
response.end
end if
%>
<!--#include file="checkuser.asp"-->
<%set rs=server.createobject("adodb.recordset")
sql="select * from applymeeting where id="&Clng(request("flowid"))
rs.open sql,conn,1,1
if rs.eof then
response.redirect "error.htm"
response.end
end if
%>
<html>
<head>
<title>会议审批</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="apply.css" type="text/css">
</head>
<script language=javascript src="apply.js"></script>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" oncontextmenu="return false">
<form name="form" method="post" action="">
<table cellpadding="0" cellspacing="0" width="100%">
<tr >
<td height="265" align="center" colspan="3">
<table width="80%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="50" class="title" align="center"> <img src="images/meetingsp.gif"></td>
</tr>
</table>
<table border="0" cellpadding="2" cellspacing="1" width="90%" bgcolor="#555555">
<tr bgcolor="f0f0f0" >
<td width="16%" height="35" align="center"> 会议名称： </td>
<td height="35" width="84%" class="applygz"> <%=rs("meetingname")%>
</td>
</tr>
<tr bgcolor="f0f0f0" >
<td width="16%" height="35" align="center"> 会议时间： </td>
<td height="35" valign="middle" width="84%" class="applygz">
<%
meetingstart=rs("timestart")
meetingend=rs("timeend")
meetingyear=left(meetingstart,4)
meetingmonth=mid(meetingstart,5,2)
meetingday=mid(meetingstart,7,2)
hourstart=mid(meetingstart,9,2)
minutestart=mid(meetingstart,11,2)
hourend=mid(meetingend,9,2)
minuteend=mid(meetingend,11,2)
%>
<%=meetingyear%>年<%=meetingmonth%>月<%=meetingday%>日 <%=hourstart%>点<%=minutestart%>分到<%=hourend%>点<%=minuteend%>分</td>
</tr>
<tr bgcolor="f0f0f0" >
<td width="16%" height="35" align="center"> 会 议 室： </td>
<td height="35" valign="middle" width="84%" class="applygz"><%=rs("roomname")%>
</td>
</tr>
<tr bgcolor="f0f0f0">
<td width="16%" height="35" align="center">参加人员:</td>
<td nowrap height="35" width="84%" class="applygz">
<%
temp=rs("attendpeople")
response.write temp
%>
</td>
</tr>
<tr bgcolor="f0f0f0">
<td height="50" width="16%" valign="middle" align="center">会议内容： </td>
<td height="50" valign="top" width="84%" >
<table width="80%" border="0" cellspacing="0" cellpadding="0" height="100%">
<tr>
<td class="applygz"><%=rs("bz")%> </td>
</tr>
</table>
</td>
</tr>
<tr bgcolor="f0f0f0">
<td width="16%" height="35" align="center">会议信息:</td>
<td nowrap height="35" width="84%" class="applygz">
<%
if rs("share")=1 then
response.write "公开"
else
response.write "不公开"
end if
%>
</td>
</tr>
<tr bgcolor="f0f0f0">
<td width="16%" height="35" align="center">申 请 人:</td>
<td nowrap height="35" width="84%" class="applygz">
<%=rs("applyname")%>
</td>
</tr>
<tr bgcolor="f0f0f0">
<td width="16%" height="35" align="center">申请时间:</td>
<td nowrap height="35" width="84%" class="applygz">
<%=rs("applytime")%>
</td>
</tr>
<tr bgcolor="f0f0f0">
<td width="16%" height="100" align="center" bgcolor="f0f0f0">审批意见:</td>
<td width="84%" height="100" bgcolor="f0f0f0"><table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="31" bgcolor="f0f0f0" class="applygz">
<input type="radio" name="radio" value="radiobutton" checked onClick="hyspwriteyes()">
批准这次会议计划
<input type="radio" name="radio" value="radiobutton" onClick="hyspwriteno()">
拒绝本次会议计划
</td></tr>
<tr>
<td bgcolor="ffffff"><textarea name="yijian" style="width:100%;height:100%;" class="14textarea">同意会议召开！ </textarea></td>
</tr>
</table></td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="46%" height="35" align="right">
<input type="image" name="send" value=" 提 交 " onClick="return checkhysp();return false;" src="images/okgif.gif" alt="确定">
</td>
<td width="8%" height="35"> </td>
<td width="46%" height="35">
<input type="image" name="send2" value=" 返 回 " onClick="history.go(-1);return false;" src="images/fanhuigif.gif" alt="返回">
<input type="hidden" name="flag" value="1">
<input type="hidden" name="choose" value="1">
<input type="hidden" name="nwid" value="<%=Clng(request("nwid"))%>">
<input type="hidden" name="flowid" value="<%=Clng(request("flowid"))%>">
</td>
</tr>
</table>
</form>
<!--#include file="close.asp"-->
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -