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

📄 order_add.asp

📁 一个做得非常精美的进存销系统,可惜某些功能上做了限制.
💻 ASP
字号:
<!--#include file="Conn.asp"-->
<!--#include file="Check.asp"-->
<!--#include file ="Inc/Date.asp"-->
<%
Dim ye,ke,xe,j,Sql
Dim rss,ord_id,len_id,zero,i
Dim isadmin,kk_id,kk_na,kk
Dim pro_id,pro_na,pro_gg,pro_money
Set xe=Server.Createobject("Adodb.RecordSet")
Sql="Select Product_ID,Name,GuiGe,Money From [Product]"
xe.Open Sql,Conn,1,1
Do While Not xe.Eof
pro_id = pro_id & xe(0) & "||"
pro_na = pro_na & xe(1) & "||"
pro_gg = pro_gg & xe(2) & "||"
pro_money = pro_money & xe(3) & "||"
xe.MoveNext
Loop
xe.Close
Set xe=Nothing

Set rss=Conn.Execute("Select Order_ID From [Order] Order By ID Desc")
ord_id = rss(0)
ord_id = Clng(ord_id)+1
len_id = Len(ord_id)
If len_id<5 Then 
   For i=1 To (5-len_id)
      zero = zero & "0"
   Next
ord_id = zero & ord_id
End if
rss.Close
Set rss=Nothing

%>
<html>
<head>
<title>管理中心</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href="Image/style.css" type=text/css rel=stylesheet>
<script language="JavaScript" src="Image/js.js"></SCRIPT>
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_jumpMenu(targ,selObj,restore){ //v3.0
  eval(targ+".location='"+selObj.options[selObj.selectedIndex].value+"'");
  if (restore) selObj.selectedIndex=0;
}
//-->
</script>
</head>
<script language="JavaScript">
<!--

function chk(theForm){ 
if (theForm.adddate.value == ""){
                alert("请输入交货时间!");
                theForm.adddate.focus();
                return (false);
        } 
if (theForm.selkehu.value == ""){
                alert("请选择客户代码!");
                theForm.selkehu.focus();
                return (false);
        } 
if (theForm.selsp1.value == ""){
                alert("请选择商品代码!");
                theForm.selsp1.focus();
                return (false);
        } 
if (theForm.pro_sl1.value == ""){
                alert("请输入销售数量!");
                theForm.pro_sl1.focus();
                return (false);
        } 
if (theForm.pro_mone1.value == ""){
                alert("请输入备注!");
                theForm.pro_mone1.focus();
                return (false);
        }
if (theForm.yudj.value == ""){
                alert("请输入预收订金!");
                theForm.yudj.focus();
                return (false);
        }
if (theForm.wuliu.value == ""){
                alert("请输入物流!");
                theForm.wuliu.focus();
                return (false);
        }
if (theForm.yunfei.value == ""){
                alert("请输入运费!");
                theForm.yunfei.focus();
                return (false);
        }
}

function CheckNum(){
   if((event.keyCode<48||event.keyCode>57)&&event.keyCode!=46) event.returnValue=false; 
   }

function pronews(id) { window.open("Order_ProFind.asp?id="+id,"","height=500,width=550,left=350,top=0,resizable=yes,scrollbars=yes,status=no,toolbar=no,menubar=no,location=no");
}

//-->
</script>
<body text="#000000">
<table cellpadding="6" cellspacing="1" border="0" width="98%" class="tableBorder" align=center>
  <form action="Order_Add2.asp" method=post id=form1 name=form1 onSubmit="return chk(this)">
    <tr bgcolor=ffffff> 
      <th height=25 align="center">添加公司销售订单</th>
    </tr>
    <tr bgcolor=ffffff> 
      <td class=forumrow> 日期:<%=Date()%> &nbsp;订单编号: 
        <input name="order_id" type="text" id="order_id" value="<%=ord_id%>" size="15" maxlength="20" readonly>
        &nbsp;交货时间: 
        <input name="button" type="button" onClick="popUpCalendar(this, form1.adddate, 'yyyy-mm-dd')" value="请选择日期">
        <input name="adddate" type="text" id="adddate" size="12" maxlength="12" readonly>
      </td>
    </tr>
    <tr bgcolor=ffffff> 
      <td class=forumrow>客户代码: 
	     <select name="selkehu" onChange="Kehu(options[selectedIndex].value)">
          <option value="" selected>选择客户代码</option>
<%
Dim cus,sqlss
sqlss = "Select Customer_ID,Customer,Address,Telphone From [Customer] Where isOK<>0"
Set cus=Conn.Execute(sqlss)
Do While not cus.Eof
Response.Write "<option value='"& cus(1) &"||"& cus(2) &"||"& cus(3) &"'>"& cus(0) &"</option>"
cus.MoveNext
Loop
cus.Close
cus=Nothing
%>
<script language="JavaScript">
function Kehu(s)
{
    var str;
	var Arr_s;
	str = s;
	Arr_s = str.split("||");
	if(s==""){
	document.form1.ke_na.value="";
	document.form1.ke_addr.value="";
	document.form1.ke_tel.value="";
	}else{
    document.form1.ke_na.value=Arr_s[0];
	document.form1.ke_addr.value=Arr_s[1];
	document.form1.ke_tel.value=Arr_s[2];
	}
}
</script>
        </select> &nbsp; 客户名称: 
        <input name="ke_na" type="text" id="ke_na" size="15" maxlength="30" readonly> &nbsp; 客户地址: 
        <input name="ke_addr" type="text" id="ke_addr" size="20" maxlength="60" readonly> &nbsp;客户电话: 
        <input name="ke_tel" type="text" id="ke_tel" size="15" maxlength="25" readonly></td>
    </tr>
    <tr bgcolor=ffffff> 
      <td class=forumrow>
	  <table width="100%" border="0" cellpadding="4" cellspacing="2">
          <tr>
            <td><input name="spsl" type="text" id="spsl" value="1" size="5" maxlength="10"> 
              <input type="button" name="Submit4" onclick="setid();" value=" 点 击 " >
              <font color="#FF0000">(添加超过1种商品,请先输入要添加的种类数量.) </font>
			 </td>
          </tr>
        </table>
        <br>
<SCRIPT language=javascript>
function setid()
{
	  var str;
	  str="";
	  if(!window.form1.spsl.value)
	   window.form1.spsl.value=1;
 	  for(var i=1;i<=window.form1.spsl.value;i++){
	     str+="<table width=100% border=0 cellpadding=2 cellspacing=0>";
         str+="<tr>"; 
         str+="<td width=4%>"; 
         str+="<div align=center>"+i+"</div></td>";
         str+="<td width=20%>"; 
         str+="<div align=center>"; 
         str+="<input name='spid"+i+"' type='text' size=10 maxlength=20 onKeyUp=ProNews('<%=pro_id%>','<%=pro_na%>','<%=pro_gg%>','<%=pro_money%>',document.form1.spid"+i+".value,document.form1.pro_news"+i+");>";
          str+="<input type='button' name='Submit3' value='查询' onClick='javascript:pronews("+i+");'>";
          str+="</div></td>";
          str+="<td width=29%>"; 
          str+="<div align='center'> ";
          str+="<input name='pro_news"+i+"' type='text' size='35' maxlength='60' readonly>";
          str+="</div>";
           str+="</td>";
           str+="<td width='9%'>";
            str+="<div align='center'> ";
            str+="<input name='pro_jg"+i+"' type='text' onKeyPress='javascript:CheckNum();' size=10 maxlength=10>";
            str+="</div></td>";
            str+="<td width=9%>"; 
           str+="<div align=center>"; 
           str+="<input name='pro_sl"+i+"' type=text onKeyPress=javascript:CheckNum(); size=10 maxlength=12>";
            str+="</div></td>";
             str+="<td>"; 
            str+="<div align=center> ";
            str+="<input name='pro_mone"+i+"' type=text size='30' maxlength='60'>";
            str+="</div></td>";
            str+="</tr></table>";
		 }
	  window.upid.innerHTML=str+"<br>";
}
</SCRIPT>

        <table width="100%" border="0" cellpadding="4" cellspacing="1" bgcolor="#FFFFFF">
          <tr> 
            <td width="4%" class=forumrow> 
              <div align="center">项目</div></td>
            <td width="20%" class=forumrow> 
              <div align="center">商品</div></td>
            <td width="10%" class=forumrow> 
              <div align="center">商品名称</div></td>
            <td width="8%" class=forumrow> 
              <div align="center">规格</div></td>
            <td width="7%" class=forumrow> 
              <div align="center">零售价</div></td>
            <td width="12%" class=forumrow> <div align="center">折扣价</div></td>
            <td width="10%" class=forumrow> <div align="center">数量</div></td>
            <td width="29%" class=forumrow><div align="center">备注</div></td>
          </tr>
          <tr> 
            <td colspan="8" class=forumrow id=upid>
                <table width="100%" border="0" cellpadding="2" cellspacing="0">
                <tr> 
                  <td width="4%"> 
                    <div align="center">1</div></td>
                  <td width="20%"> 
                    <div align="center"> 
                      <input name="spid1" type="text" id="spid1" size="10" maxlength="20" onKeyUp="ProNews('<%=pro_id%>','<%=pro_na%>','<%=pro_gg%>','<%=pro_money%>',document.form1.spid1.value,document.form1.pro_news1);">
                      <input type="button" name="Submit3" value="查询" onClick="javascript:pronews(1);">
                    </div></td>
<script language="JavaScript">
function ProNews(pid,pna,pgg,pmon,spid,pnews)
{
    var str1;
	var str2;
	var str3;
	var str4;
	var arr_str1;
	var arr_str2;
	var arr_str3;
	var arr_str4;
	var aa;
	str1 = pid;
	str2 = pna;
	str3 = pgg;
	str4 = pmon;
	arr_str1 = str1.split("||");
	arr_str2 = str2.split("||");
	arr_str3 = str3.split("||");
	arr_str4 = str4.split("||");

      for(var i=0;i<=arr_str1.length;i++){
		 if(spid==arr_str1[i]){
	        pnews.value=arr_str2[i]+" , "+arr_str3[i]+" , "+arr_str4[i];}
	  }
	  
}
</script>
                  <td width="29%"> 
                    <div align="center"> 
                      <input name="pro_news1" type="text" id="pro_news1" size="35" maxlength="60" readonly>
                    </div>
                    </td>
                  <td width="9%"> 
                    <div align="center"> 
                      <input name="pro_jg1" type="text" id="pro_jg1" onKeyPress="javascript:CheckNum();" size="10" maxlength="10">
                    </div></td>
                  <td width="9%"> 
                    <div align="center"> 
                      <input name="pro_sl1" type="text" onKeyPress="javascript:CheckNum();" id="pro_sl1" size="10" maxlength="12">
                    </div></td>
                  <td> 
                    <div align="center"> 
                      <input name="pro_mone1" type="text" id="pro_mone1" size="30" maxlength="60">
                    </div></td>
                </tr>
              </table>
             </td>
          </tr>
        </table>
		
        <br></td>
    </tr>
    <tr bgcolor=ffffff> 
      <td class=forumrow><div align="right">预收订金: 
          <input name="yudj" type="text" id="yudj2" onKeyPress="javascript:CheckNum();" size="10" maxlength="20">
          物流: 
          <input name="wuliu" type="text" id="wuliu2" size="20" maxlength="30">
          运费: 
          <input name="yunfei" type="text" id="yunfei2" onKeyPress="javascript:CheckNum();" size="10" maxlength="15">
        </div></td>
    </tr>
    <tr  bgcolor=ffffff> 
      <td height="30" align="center" class=forumrow> <input type="submit" name="Submit" value="添 加"> 
        <input type="reset" name="Submit2" value="清 空"></td>
    </tr>
  </form>
</table>
</html>

⌨️ 快捷键说明

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