📄 inputdoc.asp

📁 红金羚v1.5办公自动化软件是基于大型数据库系统开发的应用系统
💻 ASP
📖 第 1 页 / 共 2 页
字号:
12 下一页
 <html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="expires" content="no-cache">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>发文系统-----草拟公文</title>
<link rel="stylesheet" type="text/css" href="../style.css">
<script src="../openwin.js"></script>
<SCRIPT src="../Popup.js"></SCRIPT>
<script language="javascript">
<!--
//表单域检查
function checkform()
{
	if (document.form1.Doc_TypeName.value=="")
	{
		alert("请选择公文类型！");
		document.form1.Doc_TypeName.focus();
		return (false);
	}
	if (document.form1.Doc_Bound.value=="")
	{
		alert("请选择发文单位类型！");
		document.form1.Doc_Bound.focus();
		return (false);
	}
	if (document.form1.Doc_UnitConnection.value=="")
	{
		alert("请选择行文方向！");
		document.form1.Doc_UnitConnection.focus();
		return (false);
	}
	if (document.form1.Doc_Title.value=="")
	{
		alert("请输入公文标题！");
		document.form1.Doc_Title.focus();
		return(false);
	}
	if (document.form1.Doc_Content.value=="")
	{
		alert("请输入公文内容！");
		document.form1.Doc_Content.focus();
		return (false);
	}
	return (true);
}
function openwin(k1,k2,k3,k4)
{
	window.open('../Public/AddNumberWord.asp?k1='+k1+'&k2='+k2+'&k3='+k3+'&k4='+k4,'wordnumberwin','toolbar=no,scrollbars=yes,resizable=0,menubar=no,width=400,height=200');
}
//增加附件文本域
function SerSlaveSums()
{
	var OutputStr,TextCount,SlaveFlag;
	OutPutStr="";
	SlaveFlag=false;
	TextCount=parseInt(window.prompt("请输入附件数量：",1))
	for (i=1;i<=TextCount;i++)
	{
		if (TextCount==1)
			OutPutStr+='<input type="text" name="Doc_Slave'+i+'" class="doc_txt" size="38" value=""><input type="hidden" name="SlaveID'+i+'" value=""><input type="hidden" name="TypeFlag'+i+'" value=""><input type="button" name="Choose'+i+'" value="选择附件"><br>';
		else
			OutPutStr+=i+'．'+'<input type="text" name="Doc_Slave'+i+'" class="doc_txt" size="38" value=""><input type="hidden" name="SlaveID'+i+'" value=""><input type="hidden" name="TypeFlag'+i+'" value=""><input type="button" name="Choose'+i+'" value="选择附件"><br>';
		SlaveFlag=true;
	}	
	if (SlaveFlag==true)
	{
		OutPutStr+='<input type="hidden" name="SlaveSums" value="'+TextCount+'">';
	}
	window.SlaveTd.innerHTML=OutPutStr;
}
//增加附件文本域
function subscribemanadd()
{
	var OutputStr,TextCount;
	OutPutStr="";
	TextCount=parseInt(window.prompt("请输入签发人总数：",1))
	for (i=1;i<=TextCount;i++)
	{
		if (TextCount==1)
			OutPutStr+='<input type="text" name="Doc_SubscribeMan" class="doc_txt" size="13" value=""><br>';
		else
			OutPutStr+=i+'．'+'<input type="text" name="Doc_SubscribeMan" class="doc_txt" size="13" value=""><br>';
	}
	window.SubscribeManTd.innerHTML=OutPutStr;
}
//打开选择公文附件窗口
function ChooseSlave(TextID)
{
	openwinfun1('InputDoc_ChooseSlave.asp?FlagValue=发文&Id='+TextID,'DispDocFrameWin',500,690);
}
//--></script>
<script language="vbscript">
sub checkkey()
 if window.event.keyCode >57 or window.event.keyCode <48 then 
		window.event.keyCode=0
	end if 
end sub
</script>
</head>
<body bgcolor="#ffffff" topmargin="0" leftmargin="0">
<head>
</head>
<body bgcolor="#EBEBEB" leftmargin="0" topmargin="0">
<table width="100%" border="0" cellspacing="0" height="5">
 <tr> 
 <td bgcolor="#ffffff" width="100%" height="100%"></td>
 </tr>
</table>
<table border="0" cellpadding="0" cellspacing="0" width="100%">
 <tr>
 <td height=67>
 <table border="0" cellpadding="0" cellspacing="0" width="610" height="67">
 <tr>
 <td width=63><img border="0" src="images/j1.gif"></td>
 <td background="images/j2.gif" align=center>
<center>
<table>
<tr>
<td><b><font size="+1">发文系统---草拟公文（录入公文内容）</font></b></td>
</tr>
</table>
</center>
</td>
 <td width="60"><img border="0" src="images/j3.gif"></td>
 </tr>
 </table>
 </td>
 </tr>
 <tr>
 <td valign=top>
 <table border="0" cellpadding="0" cellspacing="0" width="610">
 <tr>
 <td background="images/j4.gif" width=17 height=280></td>
 <td valign=top height=100%> <br>
<div align="center">
 <center>
 <form method="POST" name="form1" onsubmit="javascript:return checkform();">
 <table border="1" cellpadding="0" cellspacing="0" width="100%" bordercolorlight="#C0C0C0" bordercolordark="#FFFFFF">
 <tr>
 <td width="30%" height="25" bgcolor="#EFEFEF">
	 <span style="font-size:9pt">公文类型：</span><select size="1" name="Doc_TypeName">
	 <option value="" selected>请选择...</option>
<option value="通知">通知</option><option value="来函">来函</option><option value="公文类型">公文类型</option> </select>
	 </td>
 <td width="30%" height="25" bgcolor="#EFEFEF">
	 <span style="font-size:9pt">发文单位类型：</span><select size="1" name="Doc_Bound">
	 <option value="" selected>请选择...</option>
 <option value="行政机关">行政机关</option>
	 <option value="企业单位">企业单位</option>
	 <option value="党机关">党机关</option>
	 </select>
	 </td>
 <td width="25%" height="25" bgcolor="#EFEFEF">
	 <span style="font-size:9pt">行文方向：</span><select size="1" name="Doc_UnitConnection">
	 <option value="" selected>请选择...</option>
	 <option value="向上级行文">向上级行文</option>
	 <option value="向下级行文">向下级行文</option>
	 <option value="平级行文">平级行文</option>
	 </select>
	 </td>
 <td width="15%" height="25" bgcolor="#EFEFEF" align="center"><input type="button" name="submit" value=" 提交 "></td>
 </tr>
 <tr>
 <td width="100%" height="25" colspan="4">
<div align="center">
<table border="0" cellpadding="0" cellspacing="0" width="620" height="1388">
 <tr>
 <td width="688" colspan="4" height="50">
 <div align="center">
 <table border="0" cellpadding="0" cellspacing="0" width="100%" height="100%">
 <tr>
 <td width="45%" valign="bottom">
 <p align="left"><font size="+1">代码:</font><input class="doc_txt1" name="Doc_Code" size="15" ></p> </td>
 <td width="55%" valign="bottom">
 <p align="right"><span style="FONT-FAMILY:
 黑体; FONT-SIZE: 16pt; mso-bidi-font-size: 16.0pt" 
 >秘密等级:<select size="1" name="Doc_SecretGrade">
				 <option value="" selected>请选择</option>
 <option value="普通">普通</option>
 <option value="秘密">秘密</option>
 <option value="机密">机密</option>
 <option value="绝密">绝密</option>
 </select>★保密期限:<select size="1" name="GetDoc_SecretTime">
				 <option value="" selected>请选择</option>
				 <option value="普通">普通</option>
 <option value="永久">永久</option>
 <option value="长期">长期</option>
 <option value="短期">短期</option>
 </select></span></p></td>
 </tr>
 </table>
 </div>
 </td>
 </tr>
 <tr>
 <td width="359" colspan="2" height="40" valign="bottom">
 <p align="left"><font size="+1">份号:</font><input class="doc_txt1" name="Doc_Number" size="15" onkeypress="vbscript:checkkey()"></p> </td>
 <td width="329" height="40" colspan="2" valign="bottom">
 <p align="right"><span style="FONT-FAMILY: 黑体; FONT-SIZE: 16pt; mso-bidi-font-size: 16.0pt">紧急程度:</span><span style="FONT-FAMILY:
 黑体; FONT-SIZE: 16pt; mso-bidi-font-size: 16.0pt" 
 ><select size="1" name="Doc_ExigenceGrade">
		 <option value="" selected>请选择</option>
		 <option value="普通">普通</option>
12 下一页
⌨️ 快捷键说明

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