meetingreg_add.asp

来自「OFFICE办公自动化」· ASP 代码 · 共 225 行

ASP
225 行
字号 
<%
'OA 表单生成器1.0
'功能：增加会议信息
'参数：request.form("addedit_subed")="true"#表单提交;
%>

<!--#include file="../inc/Secure.asp"-->
<!--#include file="../inc/conn.asp"-->
<!--#include file="../inc/Const.asp"-->

<%
'response.buffer=false
'------------------------------------------------设置参数
LoginID=trim(session("LoginID")) : if LoginID="" then LoginID=0 '当前用户ID
'------------------------------------------------
'------------------------------------------------增加记录
table="tbioaMeetingReg" '表名
if request.form("addedit_subed")="true" then 
'表单提交后

	'接受录入参数
	input_name=Request.Form("input_name")'会议名称
	input_subject=Request.Form("input_subject")'会议主题
	input_startime=Request.Form("input_startime")'开始时间
	input_endtime=Request.Form("input_endtime")'结束时间
	input_manager=Request.Form("input_manager")'会议主持
	input_booker=Request.Form("input_booker")'书记员
	input_member=Request.Form("input_member")'参与人
	input_caption=Request.Form("input_caption")'会议说明
	input_areamod=Request.Form("input_areamod")'地点标志
	input_roomid=Request.Form("input_roomid")'会议室ID号
	input_area=Request.Form("input_area")'会议地点


	'添加时使用的字段
	field1=array("name","subject","startime","endtime","manager","booker","member","caption","areamod","roomid","area","sdate","userid")
	value1=array(input_name,input_subject,input_startime,input_endtime,input_manager,input_booker,input_member,input_caption,input_areamod,input_roomid,input_area,date(),LoginID)


	for i=0 to ubound(field1)
		value1(i)=replace(value1(i),"'","''")
	next
	sql = "INSERT INTO " & table & " (" & Join(field1, ",") & ") VALUES ('" & Join(value1, "','") & "')"
	oConn.Execute sql

	word="<p>会议信息已成功提交!</p><p><img border=0 src=../images/icon_show.gif align=left width=16 height=16><a href=MeetingReg_add.asp>继续提交</a>"
end if
'------------------------------------------------
%>


<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../css/main.css" type=text/css>
<title>main</title>
<script src="../js/Popup.js"></script>
<script src="../js/front_chec.js"></script>
<script src="../js/user_select.js"></script>
<script language="JavaScript">
<!--
 function require(form){
	return	checnull(form.input_name,"请填写会议名称！")&&
	checnumber(form.input_booker,"书记员必须为数字！")&&
	checnull(form.input_member,"请填写参与人！")&&
	checnumber(form.input_roomid,"会议室ID号必须为数字！")&&
	1==1;
 }
 
 function selectbooker(form){
	userid=SelectUser()
	if (userid) { 
		form.input_booker.value=userid.split("_")[0]
		form.input_booker_name.value=userid.split("_")[1]
	}
 }
 function selectmember(form){
	userid=SelectUsers(form.input_member.value)
	if (userid) { 
		form.input_member.value=userid.split("_")[0]
		form.input_member_name.value=userid.split("_")[1]
	}
 }
 function selectarea(form){
	if (form.input_areamod.value=="外部"){
		form.input_area.style.display="block"
		form.input_roomid.style.display="none"
	}else{
		form.input_roomid.style.display="block"
		form.input_area.style.display="none"
	}
 }
-->
</script>
</head>

<body topmargin="10" leftmargin="10">

<!--#include file="MeetingReg_menu.html"-->

<hr width="100%" size=1 color="#000000">
<br>

<div align="center">
<table width="500" cellspacing="1" cellpadding="2" class="tab">
  <tr>
    <td width="100%" class="tdTop">
      <table border="0" width="100%" cellspacing="0" cellpadding="0">
        <tr>
          <td class="tdTop">
            <p align="left"><img border="0" src="../images/icon_title.gif" align="left">填写会议信息</p>
          </td>
        </tr>
      </table>
    </td>
  </tr>
  <tr>
    <td width="25%" class="td1">
    
    <% if request.form("addedit_subed")="true" then %>
      <table border="0" width="100%" cellspacing="10" cellpadding="0">
        <tr>
          <td width="36%">
            <p align="right"><img border="0" src="../images/edit.gif" width="32" height="32">
          </td>
          <td width="64%"><p>　</p>
            <%=word%>
          </td>
        </tr>
        <tr>
          <td width="100%" colspan="2">
          </td>
        </tr>
      </table> 
    <% else %>
    <form name="eventfrm" method="POST" action="" onSubmit="return require(this)">
      <input type=hidden name="addedit_subed" value="true">
      <table border="0" width="500" cellspacing="10" cellpadding="0">
        <tr>
          <td width="88" align="right" valign="top" nowrap>会议名称：</td>
          <td width="392" nowrap colspan="3"><input type="text" name="input_name" value="<%=show_name%>" size="49" maxlength="250" class="input"> <font COLOR="RED">*</font>   
          </td>
        </tr>
        <tr>
          <td width="88" align="right" valign="top" nowrap>会议主题：</td>
          <td width="392" nowrap colspan="3"><input type="text" name="input_subject" value="<%=show_subject%>" size="49" maxlength="250" class="input">
          </td>
        </tr>
        <tr>
          <td width="88" align="right" valign="top" nowrap>开始时间：</td>
          <td nowrap><input TYPE="TEXT" SIZE="12" MAXLENGTH="12" NAME="input_startime" value="<%=show_startime%>" class="input" readonly> <a href=# title="选择日期" onClick="fPopUpDlg('../js/calendar.htm', document.eventfrm.input_startime, 'winpop', 234, 261);return false"><img src="../images/datetime.gif" border=0></a>
          </td>
          <td nowrap align="right">结束时间：
          </td>
          <td nowrap><input TYPE="TEXT" SIZE="12" MAXLENGTH="12" NAME="input_endtime" value="<%=show_endtime%>" class="input" readonly> 
            <a href=# title="选择日期" onClick="fPopUpDlg('../js/calendar.htm', document.eventfrm.input_endtime, 'winpop', 234, 261);return false"><img src="../images/datetime.gif" border=0></a>
          </td>
        </tr>
        <tr>
          <td width="88" align="right" valign="top" nowrap>会议主持：</td>
          <td nowrap><input type="text" name="input_manager" value="<%=show_manager%>" size="19" maxlength="250" class="input">
          </td>
          <td nowrap align="right">书记员：
          </td>
          <td nowrap>
            <input type=hidden name="input_booker" value="<%=show_booker%>">
            <input type="text" name="input_booker_name" value="<%=getusername(show_booker)%>" size="8" maxlength="250" class="input" disabled>
            <input TYPE="button" class="button0" value="选择" name="select" onclick="selectbooker(eventfrm)" onmouseout=className="button0" onmouseover=className="button1">
          </td>
        </tr>
        <tr>
          <td width="88" align="right" valign="top" nowrap>参与人：</td>
          <td width="392" nowrap colspan="3">
            <input type=hidden name="input_member" value="<%=show_member%>">
            <input type="text" name="input_member_name" value="<%=getusernames(show_member," ")%>" size="45" maxlength="250" class="input" disabled>
            <input TYPE="button" class="button0" value="选择" name="select" onclick="selectmember(eventfrm)" onmouseout=className="button0" onmouseover=className="button1"> <font COLOR="RED">*</font>  
          </td>
        </tr>
        <tr>
          <td width="88" align="right" valign="top" nowrap>会议说明：</td>
          <td width="392" nowrap colspan="3"><textarea name="input_caption" rows="5" cols="47" class="textarea"><%=show_caption%></textarea>
          </td>
        </tr>
        <tr>
          <td width="88" align="right" nowrap>会议地点：</td>
          <td width="392" nowrap colspan="3">
		<table><tr><td>
		<select name="input_areamod" onclick="selectarea(eventfrm)">
			<option value="内部" <%=selected("内部",show_areamod)%>>内部</option>
			<option value="外部" <%=selected("外部",show_areamod)%>>外部</option>
		</select>
		<td>
		<input type="text" name="input_area" value="<%=show_area%>" size="39" maxlength="250" class="input" style="display:none">
		<select style="width:290" name="input_roomid">
			<%call Options("tbioaMeetingRoom","name",show_roomid)%>
		</select>
		</tr></table>
          </td>
        </tr>
        <tr>
          <td width="492" colspan="4">
           <input type="submit" value="确定" name="B1" class="button0" onmouseout=className="button0" onmouseover=className="button1">　<input type="reset" value="全部重写" name="B2" class="button0" onmouseout=className="button0" onmouseover=className="button1">
          </td>
        </tr>
      </table>

    </form>
    <% end if %>
    
    </td>
  </tr>
  <tr>
    <td width="25%" class="tdBottom">
    </td>
  </tr>
</table>
</div>
</body>

</html>

<%'释放对象变量
oConn.close
%>

meetingreg_add.asp - 源码说明

本页面展示了「OFFICE办公自动化」中的 meetingreg_add.asp 源码文件，采用 ASP 编程语言编写，共 225 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与Office自动化相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?