📄 khdd.asp
字号:
rst.movenext
loop
end if
rst.close
set rst=nothing
%>
Pcount=<%=count%>;
function key2()
{var l=0;
if(document.myform.m_name.value==""){
alert("请先选择客户!")
document.myform.f_spxh.value=""
document.myform.m_khid1.value=""
document.myform.m_khid1.focus()
return false
}
var flag1;
flag1=0;
//取商品名称
for (p=0;p<Pcount;p++)
{
if(document.myform.f_spxh.value.substring(0,2)==shang[p][0])
{
document.myform.spmc.value=shang[p][1];
break; }
else{
document.myform.spmc.value="";
}
}
for (l=0;l<Pcount;l++)
{
if(document.myform.f_spxh.value.substring(0,4)==shang1[l][0])
{
document.myform.ggxh.value=shang1[l][1];
break;
}
else{
document.myform.ggxh.value="";
} // {alert(document.myform.f_spxh.value.substring(0,4)+shang1[l][1])
}
for (t=0;t<Pcount;t++)
{
if(document.myform.f_spxh.value==shang2[t][0])
{
document.myform.ggxh.value=shang1[l][1]+"-"+shang2[t][1];
document.myform.jldw.value=shang2[t][2];
break;
}
else{
document.myform.jldw.value="";
}
}
} //key2事件响完成
function zkch2()
{
var bz
spxh=document.myform.f_spxh.value
unit=document.myform.jldw.value
//alert("asd")
if (unit=="" ||spxh==""){
return false
}
ddbh=document.myform.ddbh.value
dyear=document.myform.dyear.value
dmonth=document.myform.dmonth.value
dday=document.myform.dday.value
ddate=dyear+"-"+dmonth+"-"+dday
xsbm=document.myform.xsbm.value
khxh=document.myform.m_khid1.value
khmc=document.myform.m_name.value
ywy=document.myform.ywy.value
bcbz=document.myform.bcbz.value
spsl=document.myform.spsl.value
//alert(zkfs+khlx+bcbz+spsl)
window.location="khdd.asp?f_spxh="+spxh+"&ddbh="+ddbh+"&ddate="+ddate+"&xsbm="+xsbm+"&khxh="+khxh+"&khmc="+khmc+"&ywy="+ywy+"&bcbz="+bcbz+"&spsl="+spsl
}
</script>
<script language="javascript">
spje=<%=je%>
function zkch()
{
var spsl=document.myform.spsl.value;
//alert(spsl+spje)
jsje=spje*spsl
document.myform.hsje.value=jsje;
}
</script>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>客户定单</title><link href="../cread.css" rel="stylesheet" type="text/css">
<script LANGUAGE="VBSCRIPT">
sub datacheck()
if myform.ddbh.value="" then
MsgBox "需求单号不能为空!", 64, "Oh no!"
focusto(1)
Exit Sub
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -