📄 zx_xxlrtcjb.asp
字号:
<!--#include file="../conn.asp"-->
<!--#include file="../function.asp"-->
<%
aspname=request("aspname")
xin=request("xin")
bh=request("bh")
name=request("name")
bid=request("bid")
xin=request("xin")
%>
<link rel="stylesheet" type="text/css" href="../style.css">
<body topmargin="0" leftmargin="0" bgcolor="#dddddd">
<script>
var x
x="<%=request.form("submitx")%>"
if (x=="查 询"){
window.location="select.asp?aspname=<%=aspname%>&bh=<%=bh%>"
}
</script>
<script>
var y
y="<%=request.form("submity")%>"
if (y=="新 增"){
window.location="<%=aspname%>.asp?aspname=<%=aspname%>&bh=<%=bh%>&name=<%=name%>&xin=1"
}
</script>
<br>
<br>
<%
action="add"
if xin=0 then
'sql="select * from ZXXMtc Where ZXXM_NO='"& bh &"'"
sql="select * from ZXXMtc Where ZXXMtc_id='"& bid &"'"
set rs=server.Createobject("ADODB.Recordset")
rs.open sql,conn,1,3
if rs.eof then
if request.form("submitn")=" 提 交 " then
ktbh=request("bh")
tzdh=request.form("tzdh")
tccx=emptyn(request.form("tccx"))
dzjf=emptyn(request.form("dzjf"))
lwf=emptyn(request.form("lwf"))
tc=emptyn(request.form("tc"))
zjtc=emptyn(request.form("zjtc"))
zj=emptyn(request.form("zj"))
tcrq=request.form("tcrq")
tqr=request.form("tqr")
rs.addnew
rs("Zxxm_no")=ktbh
rs("Zxxmtc_tzdh")=tzdh
rs("Zxxmtc_no")=tccx
rs("Zxxmtc_dzjf")=dzjf
rs("Zxxmtc_lwftcl")=lwf
rs("Zxxmtc_tcjf")=tc
rs("Zxxmtc_zjtcl")=zjtc
rs("Zxxmtc_zjf")=zj
rs("Zxxmtc_tcrq")=tcrq
rs("Zxxmtc_tqr")=tqr
rs.update
action="suc"
errn="提成基本信息录入成功！"
end if
else
ktbh=rs("Zxxm_no")
tzdh=rs("Zxxmtc_tzdh")
tccx=rs("Zxxmtc_no")
dzjf=rs("Zxxmtc_dzjf")
lwf=rs("Zxxmtc_lwftcl")
tc=rs("Zxxmtc_tcjf")
zjtc=rs("Zxxmtc_zjtcl")
zj=rs("Zxxmtc_zjf")
tcrq=rs("Zxxmtc_tcrq")
tqr=rs("Zxxmtc_tqr")
if request.form("submitn")=" 提 交 " then
ktbh=request("ktbh")
tzdh=request.form("tzdh")
tccx=emptyn(request.form("tccx"))
dzjf=emptyn(request.form("dzjf"))
lwf=emptyn(request.form("lwf"))
tc=emptyn(request.form("tc"))
zjtc=emptyn(request.form("zjtc"))
zj=emptyn(request.form("zj"))
tcrq=request.form("tcrq")
tqr=request.form("tqr")
rs("Zxxm_no")=ktbh
rs("Zxxmtc_tzdh")=tzdh
rs("Zxxmtc_no")=tccx
rs("Zxxmtc_dzjf")=dzjf
rs("Zxxmtc_lwftcl")=lwf
rs("Zxxmtc_tcjf")=tc
rs("Zxxmtc_zjtcl")=zjtc
rs("Zxxmtc_zjf")=zj
rs("Zxxmtc_tcrq")=tcrq
rs("Zxxmtc_tqr")=tqr
rs.update
action="suc"
errn="提成基本信息录入成功！"
end if
end if
elseif xin=1 then
sql="select * from ZXXMtc "
set rs=server.Createobject("ADODB.Recordset")
rs.open sql,conn,1,3
if request.form("submitn")=" 提 交 " then
ktbh=request("bh")
tzdh=request.form("tzdh")
tccx=emptyn(request.form("tccx"))
dzjf=emptyn(request.form("dzjf"))
lwf=emptyn(request.form("lwf"))
tc=emptyn(request.form("tc"))
zjtc=emptyn(request.form("zjtc"))
zj=emptyn(request.form("zj"))
tcrq=request.form("tcrq")
tqr=request.form("tqr")
rs.addnew
rs("Zxxm_no")=ktbh
rs("Zxxmtc_tzdh")=tzdh
rs("Zxxmtc_no")=tccx
rs("Zxxmtc_dzjf")=dzjf
rs("Zxxmtc_lwftcl")=lwf
rs("Zxxmtc_tcjf")=tc
rs("Zxxmtc_zjtcl")=zjtc
rs("Zxxmtc_zjf")=zj
rs("Zxxmtc_tcrq")=tcrq
rs("Zxxmtc_tqr")=tqr
rs.update
action="suc"
errn="提成基本信息录入成功！"
end if
end if
%>
<%if action="add" then%>
<table width="100%" height="151" border="0" cellpadding="0" cellspacing="0" bordercolor="#D6CFCE" background=>
<tr>
<td height="28"> <table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><div align="center"><strong>纵向项目提成基本信息表</strong></div></td>
</tr>
</table></td>
</tr>
<tr>
<td height="121"> <div align="right">
<form name="form1" class="" method="post">
<table width="874" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="218" align="left"><div align="right">课题编号：</div></td>
<td width="222"><input name="ktbh" type=text readonly="" value="<%=bh%>" id="ktbh" style="BORDER-RIGHT: #ffffff 1px groove; BORDER-TOP: #ffffff 1px groove; FONT: 12px Verdana,Geneva,sans-serif; BORDER-LEFT: #ffffff 1px groove; WIDTH: 160px; COLOR: #000000; BORDER-BOTTOM: #ffffff 1px groove; HEIGHT: 18px; BACKGROUND-COLOR: #C0C0C0" size=12 maxlength=20></td>
<td width="146">提成次序：</td>
<td width="288">
<input name="tccx" type=text id="ktbh5" style="BORDER-RIGHT: #ffffff 1px groove; BORDER-TOP: #ffffff 1px groove; FONT: 12px Verdana,Geneva,sans-serif; BORDER-LEFT: #ffffff 1px groove; WIDTH: 160px; COLOR: #000000; BORDER-BOTTOM: #ffffff 1px groove; HEIGHT: 18px; BACKGROUND-COLOR: #dff1f9" value="<%=tccx%>" size=12 maxlength=2></td>
</tr>
<tr>
<td height="14" width="218" align="left"></td>
<td width="222"> <div align="left">
</div></td>
<td width="146"> </td>
<td width="288"> </td>
</tr>
<tr>
<td width="218" align="left"><div align="right">通知单号：</div></td>
<td width="222"><input name="tzdh" type=text id="ktbh3" style="BORDER-RIGHT: #ffffff 1px groove; BORDER-TOP: #ffffff 1px groove; FONT: 12px Verdana,Geneva,sans-serif; BORDER-LEFT: #ffffff 1px groove; WIDTH: 160px; COLOR: #000000; BORDER-BOTTOM: #ffffff 1px groove; HEIGHT: 18px; BACKGROUND-COLOR: #dff1f9" value="<%=tzdh%>" size=12 maxlength=10></td>
<td width="146">到帐经费：</td>
<td width="288"><input name="dzjf" type=text id="dzjf" style="BORDER-RIGHT: #ffffff 1px groove; BORDER-TOP: #ffffff 1px groove; FONT: 12px Verdana,Geneva,sans-serif; BORDER-LEFT: #ffffff 1px groove; WIDTH: 160px; COLOR: #000000; BORDER-BOTTOM: #ffffff 1px groove; HEIGHT: 18px; BACKGROUND-COLOR: #dff1f9" value="<%=dzjf%>" size=12 maxlength=12></td>
</tr>
<tr>
<td width="218" align="left"><div align="right"> </div></td>
<td width="222"> </td>
<td width="146"> </td>
<td width="288"> </td>
</tr>
<tr>
<td width="218" align="left"><div align="right">劳务费提成率：</div></td>
<td width="222"><input name="lwf" type=text id="lwf" style="BORDER-RIGHT: #ffffff 1px groove; BORDER-TOP: #ffffff 1px groove; FONT: 12px Verdana,Geneva,sans-serif; BORDER-LEFT: #ffffff 1px groove; WIDTH: 160px; COLOR: #000000; BORDER-BOTTOM: #ffffff 1px groove; HEIGHT: 18px; BACKGROUND-COLOR: #dff1f9" value="<%=lwf%>" size=12 maxlength=5></td>
<td width="146">提成经费：</td>
<td width="288"><input name="tc" type=text id="tc" style="BORDER-RIGHT: #ffffff 1px groove; BORDER-TOP: #ffffff 1px groove; FONT: 12px Verdana,Geneva,sans-serif; BORDER-LEFT: #ffffff 1px groove; WIDTH: 160px; COLOR: #000000; BORDER-BOTTOM: #ffffff 1px groove; HEIGHT: 18px; BACKGROUND-COLOR: #dff1f9" value="<%=tc%>" size=12 maxlength=12></td>
</tr>
<tr>
<td width="218" align="left"> </td>
<td width="222"> </td>
<td width="146"> </td>
<td width="288"> </td>
</tr>
<tr>
<td width="218" align="left"><div align="right">中介提成率：</div></td>
<td width="222"><input name="zjtc" type=text id="zjtc" style="BORDER-RIGHT: #ffffff 1px groove; BORDER-TOP: #ffffff 1px groove; FONT: 12px Verdana,Geneva,sans-serif; BORDER-LEFT: #ffffff 1px groove; WIDTH: 160px; COLOR: #000000; BORDER-BOTTOM: #ffffff 1px groove; HEIGHT: 18px; BACKGROUND-COLOR: #dff1f9" value="<%=zjtc%>" size=12 maxlength=5></td>
<td width="146">中介费：</td>
<td width="288"><input name="zj" type=text id="zj" style="BORDER-RIGHT: #ffffff 1px groove; BORDER-TOP: #ffffff 1px groove; FONT: 12px Verdana,Geneva,sans-serif; BORDER-LEFT: #ffffff 1px groove; WIDTH: 160px; COLOR: #000000; BORDER-BOTTOM: #ffffff 1px groove; HEIGHT: 18px; BACKGROUND-COLOR: #dff1f9" value="<%=zj%>" size=12 maxlength=12></td>
</tr>
<tr>
<td width="218" align="left"><div align="right"> </div></td>
<td width="222"> </td>
<td width="146"> </td>
<td width="288"> </td>
</tr>
<tr>
<td width="218" align="left"><div align="right">提成日期：</div></td>
<td width="222"><input name="tcrq" value="<%=tcrq%>" type=text id="ktbh310" readonly="" style="BORDER-RIGHT: #ffffff 1px groove; BORDER-TOP: #ffffff 1px groove; FONT: 12px Verdana,Geneva,sans-serif; BORDER-LEFT: #ffffff 1px groove; WIDTH: 160px; COLOR: #000000; BORDER-BOTTOM: #ffffff 1px groove; HEIGHT: 18px; BACKGROUND-COLOR: #dff1f9" size=12 maxlength=8>
<a href='#' onClick="window.open('dateinput.asp?Accept=form1.tcrq','','width=450,height=280');"><img src="../images/open.gif" width="18" height="12" border="0"></a></td>
<td width="146">提取人：</td>
<td width="288"><input name="tqr" type=text id="ktbh32" style="BORDER-RIGHT: #ffffff 1px groove; BORDER-TOP: #ffffff 1px groove; FONT: 12px Verdana,Geneva,sans-serif; BORDER-LEFT: #ffffff 1px groove; WIDTH: 160px; COLOR: #000000; BORDER-BOTTOM: #ffffff 1px groove; HEIGHT: 18px; BACKGROUND-COLOR: #dff1f9" value="<%=tqr%>" size=12 maxlength=12></td>
</tr>
<tr>
<td width="218"><div align="right"> </div></td>
<td width="222"> </td>
<td width="146"> </td>
<td width="288"> </td>
</tr>
<tr>
<td colspan="4" width="874">
<div align="center">
<INPUT type=submit value=' 提 交 ' name=Submitn OnClick="return check()" style="background-color: #DDDDDD; background-repeat: repeat; background-attachment: scroll; font-size: 9pt; height: 20; width: 50; border: 1px groove #000000; background-position: 0% 50%">
<INPUT name="reset" type=reset style="background-color: #DDDDDD; background-repeat: repeat; background-attachment: scroll; font-size: 9pt; height: 20; width: 50; border: 1px groove #000000; background-position: 0% 50%" value=' 取 消 '>
<INPUT type=submit value="查 询" name=Submitx style="background-color: #DDDDDD; background-repeat: repeat; background-attachment: scroll; font-size: 9pt; height: 20; width: 50; border: 1px groove #000000; background-position: 0% 50%">
<INPUT type=submit value="新 增" name=Submity style="background-color: #DDDDDD; background-repeat: repeat; background-attachment: scroll; font-size: 9pt; height: 20; width: 50; border: 1px groove #000000; background-position: 0% 50%">
</div>
</td>
</tr>
</table>
</form>
</div></td>
</tr>
</table>
<%elseif action="suc" then%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><div align="center"><script>
alert("<% =errn %>")
if(confirm("您是否需要继续录入或修改同一编号的提成基本信息？"))
{window.location="<%=aspname%>.asp?aspname=<%=aspname%>&bh=<%=bh%>&name=<%=name%>&xin=1"
}
else
window.close
</script>
</div></td>
</tr>
</table>
<%end if%>
<!--
判断通知单号是否为空以及各数值性字段的录入是否正确
沈中林
2003.10.8
-->
<script>
function check(){
var nr1;
var j=0;
nr1=document.form1.tzdh.value;
if(nr1=="" ){
alert("通知单号不能为空，重新输入");
return(false);
}
nr1=document.form1.tccx.value;
for (var i=0;i<nr1.length;i++){
if(nr1.charAt(i)<"0" || nr1.charAt(i)>"9" ){
alert("提成次序必须是正整数！");
return(false);
}
}
j=0;
nr1=document.form1.dzjf.value;
for (var i=0;i<nr1.length;i++){
if((nr1.charAt(i)<"0" || nr1.charAt(i)>"9" ) && nr1.charAt(i)!="."){
alert("到帐经费里只可输入数字，请不要输入其他的字符！");
return(false);
}
else{
if(nr1.charAt(i)==".") j=j+1;
if(j>1){
alert("到帐经费里输入小数点有错！");
return(false);
}
}
}
nr1=document.form1.lwf.value;
j=0;
for (var i=0;i<nr1.length;i++){
if((nr1.charAt(i)<"0" || nr1.charAt(i)>"9" ) && nr1.charAt(i)!="."){
alert("劳务费提成率里只可输入数字，请不要输入其他的字符！");
return(false);
}
else{
if(nr1.charAt(i)==".") j=j+1;
if(j>1){
alert("劳务费提成率里输入小数点有错！");
return(false);
}
}
}
if (nr1>=100 || nr1<0){
alert("劳务费提成率必须小于100或大于0，请重新输入！");
return(false);
}
nr1=document.form1.tc.value;
j=0;
for (var i=0;i<nr1.length;i++){
if((nr1.charAt(i)<"0" || nr1.charAt(i)>"9" ) && nr1.charAt(i)!="."){
alert("提成经费里只可输入数字，请不要输入其他的字符！");
return(false);
}
else{
if(nr1.charAt(i)==".") j=j+1;
if(j>1){
alert("提成经费里输入小数点有错！");
return(false);
}
}
}
nr1=document.form1.zjtc.value;
j=0;
for (var i=0;i<nr1.length;i++){
if((nr1.charAt(i)<"0" || nr1.charAt(i)>"9" ) && nr1.charAt(i)!="."){
alert("中介提成率里只可输入数字，请不要输入其他的字符！");
return(false);
}
else{
if(nr1.charAt(i)==".") j=j+1;
if(j>1){
alert("中介提成率里输入小数点有错！");
return(false);
}
}
}
if (nr1>=100 || nr1<0){
alert("中介提成率必须小于100或大于0，请重新输入！");
return(false);
}
nr1=document.form1.zj.value;
j=0;
for (var i=0;i<nr1.length;i++){
if((nr1.charAt(i)<"0" || nr1.charAt(i)>"9" ) && nr1.charAt(i)!="."){
alert("中介费里只可输入数字，请不要输入其他的字符！");
return(false);
}
else{
if(nr1.charAt(i)==".") j=j+1;
if(j>1){
alert("中介费里输入小数点有错！");
return(false);
}
}
}
nr1=document.form1.tcrq.value;
if(nr1=="" ){
alert("提成日期不能为空，重新输入");
return(false);
}
}
</script>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -