⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 documentedit.asp

📁 OFFICE办公自动化
💻 ASP
📖 第 1 页 / 共 2 页
字号:
🔍
12 
     webform.jqygbh.value=strtmpusers[0];
     if (webform.jqygbh.value=="") return false;
     if (confirm("确定加签吗？")==false) return false;
     webform.czlx.value="add";
     webform.action="Document_EditSave.asp";
     if (require(webform)<%if mEditType<>0 then%>&&SaveDocument()<%end if%>)  webform.submit();
  }
}
function doback(){//退签
  if (confirm("确定退签吗？")==false){
      return false
  }
  webform.czlx.value="back";
  webform.action="Document_EditSave.asp";
  if (require(webform)<%if mEditType<>0 then%>&&SaveDocument()<%end if%>)  webform.submit();
}
</script>
<style type="text/css">
<!--
.style1 {color: #FF0000}
-->
</style>
</head>

<body class="tdbottom" onload="WindowResize();Load()" onunload="UnLoad()" topmargin="1" leftmargin="1">

<form name="webform" method="post" action="DocumentSave.asp" onsubmit="return require(this)&&SaveDocument();">
<input type=hidden name=czlx value="">
<input type=hidden name=blxh value="<%=mBLXH%>">
<input type=hidden name=RecordID value="<%=mRecordID%>">
<input type=hidden name=Template value="<%=mTemplate%>">
<input type=hidden name=FileType value="<%=mFileType%>">
<input type=hidden name=EditType value="<%=mEditType%>">
<input type=hidden name=HTMLPath value="<%=mHTMLPath%>">
<input type=hidden name=Status value="<%=mStatus%>">
<table border=0 cellspacing='1' cellpadding='3' width=100% align=center class="noprint">
  <tr>
    <td align=left class="td3">
      <table border=0 cellspacing='0' cellpadding='0' width=100%>
        <tr>
          <td nowrap>
            <img src="../images/icon_title.gif" align="absmiddle"> <b>公文办理>><%=server.HTMLEncode(gzdmc & "")%>
<%
	if blr&""<>LoginID then
	  dlrxm=GetUserName(LoginID)
	else
	  dlrxm="----"
	end if
%>
            　　办理人：<%=GetUserName(blr)%>　　代理人：<%=dlrxm%>
          </td>
          <td width="85" nowrap>
            <object id="WebBrowser" width=0 height=0 classid="CLSID:8856F961-340A-11D0-A96B-00C04FD705A2"> </object>
            <img src="../images/print.gif" align="absmiddle"> <a href="#" onClick="javascript:WindowOpen1('DocumentHeadPrint.asp?RecordID=<%=mRecordID%>&GZDBH=<%=mGZDBH%>')">打印文头</a>
          </td>
          <td width="110" nowrap>
            <img src="../images/icon_flow.gif" align="absmiddle"> <a href="javascript:WindowOpen1('F_Point_Show.asp?RecordID=<%=mRecordID%>')">公文流转情况</a>
          </td>
        </tr>
      </table>
    </td>
  </tr>
</table>
<br>
<table border=0 cellspacing='0' cellpadding='1' width=100% height=100% align=center>

<%if mid(dtcs1,2,1)="1" then%>
  <tr>
    <td align="right" class="tdBottom" nowrap>公文种类：</td>
    <td class="tdBottom"><select name='DC_Doc_Sort' size='1' <%Call input_disabled(DTCS2,2,1)%>>
      <%Call pOptions("tbioaOffice_Document_Sort","doc_sort",0,mDC_Doc_Sort,"")%>
      </select>
      <select name='DocType' size='1' <%Call input_disabled(DTCS2,2,1)%>>
        <option value='外部' <%if mDocType="外部" then response.write "selected"%>>外部</option>
        <option value='内部' <%if mDocType="内部" then response.write "selected"%>>内部</option>
      </select>
      公文类型：
      <select name='DocMod' size='1' <%Call input_disabled(DTCS2,2,1)%>>
        <option value='收文' <%if mDocMod="收文" then response.write "selected"%>>收文</option>
        <option value='发文' <%if mDocMod="发文" then response.write "selected"%>>发文</option>
      </select>
      公文紧急程度：
      <select name='DC_Doc_Exigence' size='1' <%Call input_disabled(DTCS2,2,1)%>>
        <option value='一般' <%if mDC_Doc_Exigence="一般" then response.write "selected"%>>一般</option>
        <option value='紧急' <%if mDC_Doc_Exigence="紧急" then response.write "selected"%>>紧急</option>
        <option value='特急' <%if mDC_Doc_Exigence="特急" then response.write "selected"%>>特急</option>
      </select>
      公文密级：
      <select name='DC_Doc_Security' size='1' <%Call input_disabled(DTCS2,2,1)%>>
        <option value='普通' <%if mDC_Doc_Security="普通" then response.write "selected"%>>普通</option>
        <option value='秘密' <%if mDC_Doc_Security="秘密" then response.write "selected"%>>秘密</option>
        <option value='机密' <%if mDC_Doc_Security="机密" then response.write "selected"%>>机密</option>
        <option value='绝密' <%if mDC_Doc_Security="绝密" then response.write "selected"%>>绝密</option>
      </select>
    </td>
  </tr>
<%end if
if mid(dtcs1,1,1)="1" then
%>
  <tr>
    <td align="right" class="tdBottom" nowrap>公文文号：</td>
    <td class="tdBottom"><input type="text" name="DocFileNo" size="25" maxlength="15" value="<%=mDocFileNo%>" <%Call input_disabled(DTCS2,1,1)%> class="input2">
    </td>
  </tr>
<%
end if
if mid(dtcs1,3,1)="1" then%>
  <tr>
    <td align="right" class="tdBottom" nowrap>公文标题：</td>
    <td class="tdBottom"><input type="text" name="Subject" size="80" maxlength="150" value="<%=mSubject%>" <%Call input_disabled(DTCS2,3,1)%> class="input2">
    </td>
  </tr>
<%end if
if mid(dtcs1,4,1)="1" then
%>
  <tr>
    <td align="right" class="tdBottom" nowrap>主题词：</td>
    <td class="tdBottom"><input  type="text" name="MainTitle" size="80" maxlength="50" value="<%=mMainTitle%>" <%Call input_disabled(DTCS2,4,1)%> class="input2">
    </td>
  </tr>
<%end if
if mid(dtcs1,5,1)="1" then%>
  <tr class="tdBottom">
    <td align="right" valign="top" class="tdBottom" nowrap>摘要：</td>
    <td><textarea name="Memo" rows="3" cols="78" class="input2" <%Call input_disabled(DTCS2,5,1)%>><%=mMemo%></textarea></td>
  </tr>
<%
end if
if mid(dtcs1,6,1)="1" then%>
  <tr>
    <td align="right" class="tdBottom" nowrap>发文单位：</td>
    <td class="tdBottom" nowrap>
    <input type="text" name="PSend_Dept" size="80" maxlength="100" value="<%=mPSend_Dept%>" <%Call input_disabled(DTCS2,6,1)%> class="input2">
    <input name="button1" type="button" id="button1" value="选择部门" class=button0 onclick="selectDep(webform.PSend_Dept)" onmouseout=className="button0" onmouseover=className="button1" <%Call input_disabled(DTCS2,6,1)%>>
    </td>
  </tr>
<%
end if
if mid(dtcs1,7,1)="1" then%>
  <tr>
    <td align="right" class="tdBottom" nowrap>主送单位：</td>
    <td class="tdBottom" nowrap>
      <input type="text" name="MSend_Dept" size="80" maxlength="100" value="<%=mMSend_Dept%>" <%Call input_disabled(DTCS2,7,1)%> class="input2">
      <input name="button1" type="button" id="button1" value="选择部门" class=button0 onclick="selectDep(webform.MSend_Dept)" onmouseout=className="button0" onmouseover=className="button1" <%Call input_disabled(DTCS2,7,1)%>>
      </td>
  </tr>
<%
end if
if mid(dtcs1,8,1)="1" then%>
  <tr>
    <td align="right" class="tdBottom" nowrap>抄送机关：</td>
    <td class="tdBottom" nowrap>
      <input type="text" name="CSend_Dept" size="80" maxlength="100" value="<%=mCSend_Dept%>" <%Call input_disabled(DTCS2,8,1)%> class="input2">
      <input name="button1" type="button" id="button1" value="选择部门" class=button0 onclick="selectDep(webform.CSend_Dept)" onmouseout=className="button0" onmouseover=className="button1" <%Call input_disabled(DTCS2,8,1)%>>
    </td>
  </tr>
  <tr>
    <td align="right" class="tdBottom" nowrap>抄报机关：</td>
    <td class="tdBottom" nowrap>
      <input type="text" name="CReport_Dept" size="80" maxlength="100" value="<%=mCReport_Dept%>" <%Call input_disabled(DTCS2,8,1)%> class="input2">
      <input name="button1" type="button" id="button1" value="选择部门" class=button0 onclick="selectDep(webform.CReport_Dept)" onmouseout=className="button0" onmouseover=className="button1" <%Call input_disabled(DTCS2,8,1)%>>
    </td>
  </tr>
<%
end if
if mid(dtcs1,9,1)="1" then%>
  <tr>
    <td align="right" class="tdBottom" nowrap>收文单位：</td>
    <td class="tdBottom" nowrap>
      <input type="text" name="Receive_Dept" size="80" maxlength="100" value="<%if mid(dtcs4,9,1)="1" then response.write mReceive_Dept%>" <%Call input_disabled(DTCS2,9,1)%> class="input2">
      <input name="button1" type="button" id="button1" value="选择部门" class=button0 onclick="selectDep(webform.Receive_Dept)" onmouseout=className="button0" onmouseover=className="button1" <%Call input_disabled(DTCS2,9,1)%>>
    </td>
  </tr>
<%
end if
if mid(dtcs1,10,1)="1" then%>
  <tr class="tdBottom">
    <td align="right" valign="top" class="tdBottom" nowrap>附注：</td>
    <td><textarea name="Do_Advice" rows="3" cols="78" class="input2" <%Call input_disabled(DTCS2,10,1)%>></textarea></td>
  </tr>
<%
end if
if mid(dtcs1,11,1)="1" then%>
  <tr>
    <td align=right class="tdBottom" nowrap> 拟制人：</td>
    <td class="tdBottom" nowrap>
    <input type=text name=NiziMan value="<%if mid(dtcs4,11,1)="1" then response.write mNiziMan%>" <%Call input_disabled(DTCS2,11,1)%> class="input2">
    拟制日期：<input type=text name=NiziDate value="<%if mid(dtcs4,11,1)="1" then response.write mNiziDate%>"  <%Call input_disabled(DTCS2,11,1)%> class="input2">
    拟制部门：<input type=text name=NiziDept value="<%if mid(dtcs4,11,1)="1" then response.write mNiziDept%>" <%Call input_disabled(DTCS2,11,1)%> class="input2">
    </td>
  </tr>
<%
end if
if mid(dtcs1,12,1)="1" then%>
  <tr>
    <td align=right class="tdBottom" nowrap>签发人：</td>
    <td class="tdBottom" nowrap>
    	<%if mSign_Man="" then mSign_Man=session("RealName")%>
	<input type=text name=Sign_Man value="<%if mid(dtcs4,12,1)="1" then response.write mSign_Man%>" <%Call input_disabled(DTCS2,12,1)%> class="input2">
	签发日期：<input type=text name=Sign_Date value="<%if mid(dtcs4,12,1)="1" then response.write date()%>" <%Call input_disabled(DTCS2,12,1)%> class="input2">
    </td>
  </tr>
<%
end if
if mid(dtcs1,13,1)="1" then%>
  <tr>
    <td align=right class="tdBottom" nowrap>登记人：</td>
    <td class="tdBottom" nowrap>
    	<%if mRegistration_Man="" then mRegistration_Man=session("RealName")%>
    	<input type=text name=Registration_Man value="<%if mid(dtcs4,13,1)="1" then response.write mRegistration_Man%>" <%Call input_disabled(DTCS2,13,1)%> class="input2">
    	登记日期：<input type=text name=Registration_Date value="<%if mid(dtcs4,13,1)="1" then response.write date()%>" <%Call input_disabled(DTCS2,13,1)%> class="input2">
    </td>
  </tr>
<%
end if
if FJZT="1" or FJZT="2" then%>
  <tr>
    <td colspan=2 align="center" class="tdBottom" valign="top" nowrap>
    <fieldset style="width:98%" align="center"> <legend>相关附件 <%if fjzt="2" then%>[<img src="../images/icon_close.gif" align="absmiddle"> <a href='javascript:WindowOpen("FileUpForm.asp?infoid=<%=mRecordID%>")'>添加附件</a>]<%end if%></legend>
    <iframe id="Accessory" src="Document_Accessory.asp?infoid=<%=mRecordID%>&fjzt=<%=FJZT%>" frameBorder="0" width="100%" height="70" marginHeight="0" marginWidth="0" scrolling="auto"></iframe>
    </td>
  </tr>
<%end if%>
  <tr>
  <td colspan=2 height=100% class="tdBottom">
        <table border=0 cellspacing='0' cellpadding='0' width='100%' height='100%'>
        <tr>
          <td height="28">
            <iframe id="toolbar" src="../inc/toolbar.asp?Status=<%=mEditType%>&Type=<%=mFileType%>&DYZWBB=<%=DYZWBB%>" frameBorder="0" width="100%" height="28" marginHeight="0" marginWidth="0" scrolling="no"></iframe>
          </td>
        </tr>
        <tr>
          <td colspan=2 height=630>
            <OBJECT id="WebOffice" width="100%" height="100%" classid="clsid:23739A7E-5741-4D1C-88D5-D50B18F7C347" codebase="<%=mClientUrl%>"></OBJECT>
          </td>
        </tr>
        <tr>
          <td bgcolor=menu height='20'>
		<div id=StatusBar>状态栏</div>
          </td>
        </tr>
        </table>
  </td>
</tr>
<%if mStep<>"CX" then%>
<tr>
  <td colspan=2 height=100% class="tdBottom">
	<input type=submit value="  保存  " <%=mDisabled%> class=td3>
	<%if DZLCQX then%>
		<input type=button value="修改工作流程" onclick="WindowOpen1('F_Point_Index_Bl.asp?RecordID=<%=mRecordID%>&BLXH=<%=mBLXH%>&dqgzdxh=<%=mGZDBH%>')" class=td3>
	<%end if%>
	<%if int(jqqx)=1 then%>
		<input type=button value="加签" onclick="doadd()" class=td3>
		<input type="hidden" id="jqygbh" name="jqygbh" value="">
	<%end if%>
	<%if int(tqqx)=1 then%>
		<input type=button value="退签" onclick="doback()" class=td3>
	<%end if%>
	<%if int(cxqx)=1 then%>
		<input type=button value="撤销" onclick="dochexiao()" class=td3>
	<%end if%>

	<input type=hidden name=xyblry value="<%=xyblry%>">
	<input type=button value="流转到(<%=NextStep%>)" onclick="dozclz()" class=td3 title="<%=blrylb%>">
	<input type=button value="  退出  " onclick="window.close()" class=td3>
  </td>
</tr>
<%else%>
<tr>
	<td colspan=2 height=100% class="tdBottom">
	      <input type="button" name="button_qxcx" class=td3 value="取消撤销" onclick="vbscript: doqxcx('<%=mRecordID%>')">
	</td>
</tr>
<script language="vbscript">
   function doqxcx(mRecordID)
       if confirm("确定要取消撤销操作吗？") then
          window.location="Document_Gwbl_Qxcx.asp?RecordID="&mRecordID
       end if
   end function
</script>
<%end if%>
</table>
</form>

</body>
</html>

<%'释放对象变量
<!--#include file="../inc/conn_close.asp"-->
%>
12

⌨️ 快捷键说明

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