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

📄 cost_jh_add.asp

📁 财务预算管理 财务支出
💻 ASP
字号:
<!--#include file="sysconfig.asp"-->
<!-- #include file="Inc/Head.asp" -->
<%
Dim count1,rsClass1,sqlClass1,id
Dim count2,rsClass2,sqlClass2
Dim count3,rsClass3,sqlClass3

'黄华于2008年3月
%>
<!-- 三级联动菜单 开始 -->
<script language="JavaScript">
<!--
<%
'二级数据保存到数组

set rsClass2=server.createobject("adodb.recordset")
sqlClass2="select * from danwei" 
rsClass2.open sqlClass2,conn,1,1
%>
var subval2 = new Array();
//数组结构:一级根值,二级根值,二级显示值
<%
count2 = 0
do while not rsClass2.eof
%>
subval2[<%=count2%>] = new Array('<%=rsClass2("guikou_id")%>','<%=rsClass2("ID")%>','<%=rsClass2("danwei_name")%>')
<%
count2 = count2 + 1
rsClass2.movenext
loop
rsClass2.close
%>
<%
'三级数据保存到数组
set rsClass3=server.createobject("adodb.recordset")
sqlClass3="select * from xiangmu" 
rsClass3.open sqlClass3,conn,1,1
%>
var subval3 = new Array();
//数组结构:二级根值,三级根值,三级显示值
<%
count3 = 0
do while not rsClass3.eof
%>
subval3[<%=count3%>] = new Array('<%=rsClass3("danwei_id")%>','<%=rsClass3("ID")%>','<%=rsClass3("xiangmu_name")%>')
<%
count3 = count3 + 1
rsClass3.movenext
loop
rsClass3.close
%>
function changeselect1(locationid)
{
    document.form1.s2.length = 0;
    document.form1.s2.options[0] = new Option('==请选择单位==','');
    document.form1.s3.length = 0;
    document.form1.s3.options[0] = new Option('==请选择项目==','');
    for (i=0; i<subval2.length; i++)
    {
        if (subval2[i][0] == locationid)
        {document.form1.s2.options[document.form1.s2.length] = new Option(subval2[i][2],subval2[i][1]);}
    }
}
function changeselect2(locationid)
{
    document.form1.s3.length = 0;
    document.form1.s3.options[0] = new Option('==请选择项目==','');
    for (i=0; i<subval3.length; i++)
    {
        if (subval3[i][0] == locationid)
        {document.form1.s3.options[document.form1.s3.length] = new Option(subval3[i][2],subval3[i][1]);}
    }
}
//-->
function CheckForm()
{
   if (document.form1.cost_number.value=="")
  {
    alert("预算金额不能为空!");
	document.form1.Title.focus();
	return falseā;
  }
    if (document.form1.s1.value=="")
  {
    alert("归口不能为空!");
	document.form1.s1.focus();
	return false;
  }
    if (document.form1.s2.value=="")
  {
    alert("单位不能为空!");
	document.form1.s2.focus();
	return false;
  }
 if (document.form1.s3.value=="")
  {
    alert("项目不能为空!");
	document.form1.s3.focus();
	return false;
  }
   return true;  
}
</script>
<%if admin_quanli=1 then%>

<table cellpadding="2" cellspacing="1" border="0" width="610" align="center" class="a2">
	<tr>
		<td class="a1" height="25" align="center"><strong>添 加 年 预 算</strong></td>
	</tr>
	<tr class="a4">
		<td align="center">
			<form method="POST" name="form1" onSubmit="return CheckForm();" action="cost_jh_save.asp?action=add" target="_self">
			<table width="600" border="0" align="center" cellpadding="0" cellspacing="0" class="border">
				<tr align="center"> 
					<td class="tdbg">
						<table width="100%" border="0" cellpadding="0" cellspacing="2">
                <tr class="t1"> 
                  <td width="95" height="22" align="right" bgcolor="#C0C0C0">所属类别:</td>
                  <td width="499" bgcolor="#E3E3E3"> 
                    <%
set rsClass1=server.createobject("adodb.recordset")
sqlClass1="select * from guikou where cost_delete=0" 
rsClass1.open sqlClass1,conn,1,1
%> <select name="s1" onChange="changeselect1(this.value)">
                      <option>==请选择业务科室==</option>
                      <%
count1 = 0
do while not rsClass1.eof
response.write"<option value="&rsClass1("id")&">"&rsClass1("guikou_name")&"</option>"
count1 = count1 + 1
rsClass1.movenext
loop
rsClass1.close
%>
                    </select> <select name="s2"  onChange="changeselect2(this.value)">
                      <option>==请选择单位==</option>
                    </select> <select name="s3">
                      <option>==请选择项目==</option>
                    </select> </td>
                </tr>
                <tr class="t1"> 
                  <td height="22" align="right" bgcolor="#C0C0C0">预算编号:</td>
                  <td bgcolor="#E3E3E3"> 
                    <input name="cost_no" type="text" id="cost_no" size="20" maxlength="80" value=""></td>
                </tr>
                <tr class="t1"> 
                  <td height="22" align="right" bgcolor="#C0C0C0">预算金额:</td>
                  <td bgcolor="#E3E3E3"> 
                    <input name="cost_number" type="text" id="cost_number" size="30" maxlength="80"onKeypress="if   (event.keyCode   <   46  ||   event.keyCode   >   57 )   event.returnValue   =   false;">
                    <font color="#FF0000">*</font>必填<font color="#FF0000">只允许数字</font></td>
                </tr>
                <tr class="t1"> 
                  <td height="22" align="right" bgcolor="#C0C0C0">预算品目:</td>
                  <td bgcolor="#E3E3E3"> 
                    <input name="pinmu" type="text" id="pinmu" size="30" maxlength="80" value="">
                    <input name="button" type=button onClick="javascript:popUp()" value="查询"></td>
                </tr>
                <tr class="t1"> 
                  <td height="22" align="right" bgcolor="#C0C0C0">年初预算:</td>
                  <td bgcolor="#E3E3E3"> 
                    <input name="yearless" type="checkbox" id="yearless" value="1" checked>
                    是<font color="#0000FF">(如果选中的话为年初预算)</font></td>
                </tr>
                <tr class="t1"> 
                  <td height="22" align="right" bgcolor="#C0C0C0">添加人员:</td>
                  <td bgcolor="#E3E3E3"><%=Session("username")%>
                    <input name="admin"  type="hidden" id="admin" size="50" maxlength="80" value="<%=Session("username")%>"></td>
                </tr>
                <tr class="t1"> 
                  <td height="22" align="right" bgcolor="#C0C0C0">录入时间:</td>
                  <td bgcolor="#E3E3E3"> 
                    <input name="UpdateTime" type="text" id="UpdateTime" value="<%=now()%>" maxlength="50">
                    默认当前时间, 注意不要改变格式。</td>
                </tr>
              </table>
					</td>
				</tr>
			</table>
				<div align="center"><p> 
				<input	name="Add" type="submit"  id="Add" value=" 添 加 " 
				onClick="documentform1.action='cost_jh_save.asp?action=add';document.form1.target='_self';">&nbsp; 
				</p></div>
			</form>
		</td>
	</tr>
</table>
<%else if admin_quanli=2 then%>
<table cellpadding="2" cellspacing="1" border="0" width="610" align="center" class="a2">
	<tr>
		<td class="a1" height="25" align="center"><strong>添 加 年 预 算</strong></td>
	</tr>
	<tr class="a4">
		<td align="center">
			<form method="POST" name="form1" onSubmit="return CheckForm();" action="cost_jh_save.asp?action=add" target="_self">
			<table width="600" border="0" align="center" cellpadding="0" cellspacing="0" class="border">
				<tr align="center"> 
					<td class="tdbg">
						<table width="100%" border="0" cellpadding="0" cellspacing="2">
                <tr class="t1"> 
                  <td width="95" height="22" align="right" bgcolor="#C0C0C0">所属类别:</td>
                  <td width="499" bgcolor="#E3E3E3"> 
                    <%
set rsClass1=server.createobject("adodb.recordset")
sqlClass1="select * from guikou where id="&admin_guikou_id 
rsClass1.open sqlClass1,conn,1,1
%> <select name="s1" onChange="changeselect1(this.value)">
                      <option>==请选择业务科室==</option>
                      <%
count1 = 0
do while not rsClass1.eof
response.write"<option value="&rsClass1("id")&">"&rsClass1("guikou_name")&"</option>"
count1 = count1 + 1
rsClass1.movenext
loop
rsClass1.close
%>
                    </select> <select name="s2"  onChange="changeselect2(this.value)">
                      <option>==请选择单位==</option>
                    </select> <select name="s3">
                      <option>==请选择项目==</option>
                    </select> </td>
                </tr>
                <tr class="t1"> 
                  <td height="22" align="right" bgcolor="#C0C0C0">预算编号:</td>
                  <td bgcolor="#E3E3E3"> 
                    <input name="cost_no" type="text" id="cost_no" size="20" maxlength="80" value=""></td>
                </tr>
                <tr class="t1"> 
                  <td height="22" align="right" bgcolor="#C0C0C0">预算金额:</td>
                  <td bgcolor="#E3E3E3"> 
                    <input name="cost_number" type="text" id="cost_number" size="30" maxlength="80"onKeypress="if   (event.keyCode   <   46  ||   event.keyCode   >   57 )   event.returnValue   =   false;">
                    <font color="#FF0000">*</font>必填<font color="#FF0000">只允许数字</font></td>
                </tr>
                <tr class="t1"> 
                  <td height="22" align="right" bgcolor="#C0C0C0">预算品目:</td>
                  <td bgcolor="#E3E3E3"> 
                    <input name="pinmu" type="text" id="pinmu" size="30" maxlength="80" value="">
                    <input name="button2" type=button onClick="javascript:popUp()" value="查询"></td>
                </tr>
                <tr class="t1"> 
                  <td height="22" align="right" bgcolor="#C0C0C0">年初预算:</td>
                  <td bgcolor="#E3E3E3"> 
                    <input name="yearless" type="checkbox" id="yearless" value="1" checked>
                    是<font color="#0000FF">(如果选中的话为年初预算)</font></td>
                </tr>
                <tr class="t1"> 
                  <td height="22" align="right" bgcolor="#C0C0C0">添加人员:</td>
                  <td bgcolor="#E3E3E3"><%=Session("username")%>
                    <input name="admin"  type="hidden" id="admin" size="50" maxlength="80" value="<%=Session("username")%>"></td>
                </tr>
                <tr class="t1"> 
                  <td height="22" align="right" bgcolor="#C0C0C0">录入时间:</td>
                  <td bgcolor="#E3E3E3"> 
                    <input name="UpdateTime" type="text" id="UpdateTime" value="<%=now()%>" maxlength="50">
                    默认当前时间, 注意不要改变格式。</td>
                </tr>
              </table>
					</td>
				</tr>
			</table>
				<div align="center"><p> 
				<input	name="Add" type="submit"  id="Add" value=" 添 加 " 
				onClick="documentform1.action='cost_jh_save.asp?action=add';document.form1.target='_self';">&nbsp; 
				</p></div>
			</form>
		</td>
	</tr>
</table>
<%else
if admin_quanli=3 then%>
 <p align="center">
 对不起<%=Session("username")%>,您是查询员没有权限作此操作!!!!
 </p>
<%end if%>
<%end if%>
<%end if%>
<BR>
<%htmlend%>
<SCRIPT LANGUAGE="JavaScript">
function popUp() {
props=window.open('select_pinmu.asp', 'poppage', 'toolbars=0, scrollbars=1, location=0, statusbars=0, menubars=0, resizable=1, width=600, height=400, left = 0, top = 0');
}
</script>

⌨️ 快捷键说明

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