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

📄 order_huinews.asp

📁 一个做得非常精美的进存销系统,可惜某些功能上做了限制.
💻 ASP
字号:
<!--#include file="Conn.asp"-->
<!--#include file="Check.asp"-->
<%
Dim pn,pid
Dim ID,Order_ID,Manage,Customer,Product_ID,DingJin,Money,Discount,Out_ShuLiang,WuLiu,YunFei,HuiKuan,Mone,Time
pid = Request.QueryString("id")
Set pn=Conn.Execute("Select ID,Order_ID,Manage,Customer,Product_ID,DingJin,Money,Discount,Out_ShuLiang,WuLiu,YunFei,HuiKuan,Mone,Time From [OrderHui] Where ID="&pid)
ID = pn(0)
Order_ID = pn(1)
Manage = pn(2)
Customer = pn(3)
Product_ID = pn(4)
DingJin = pn(5)
Money = pn(6)
Discount = pn(7)
Out_ShuLiang = pn(8)
WuLiu = pn(9)
YunFei = pn(10)
HuiKuan = pn(11)
Mone = pn(12)
Time = pn(13)
pn.Close
Set pn=Nothing

Dim ke,ke_add,ke_tel
Set ke=Conn.Execute("Select Address,Telphone From [Customer] Where Customer='"&Customer&"'")
ke_add = ke(0)
ke_tel = ke(1)
ke.Close
Set ke=Nothing

Dim pro,pro_name,pro_gg
Set pro=Conn.Execute("Select Name,GuiGe From [Product] Where Product_ID='"&Product_ID&"'")
pro_name = pro(0)
pro_gg = pro(1)
pro.Close
Set pro=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>
</head>
<body text="#000000">
<table width="95%" border="0" cellpadding="0" cellspacing="0" align="center" class=TableBorder>
  <tr valign="middle" align="center"> 
    <th height="22">回款单信息</th>
  </tr>
  <tr valign="middle" align="center"> 
    <td><table width="100%" border="0" cellpadding="4" cellspacing="1" bgcolor="#eeeeee">
        <tr bgcolor="#FFFFFF"> 
          <td width="20%"><div align="right">订单编号:</div></td>
          <td width="80%">&nbsp;<%=Order_ID%></td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td><div align="right">商品名称:</div></td>
          <td width="80%">&nbsp;<%=pro_name%></td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td><div align="right">客户名称:</div></td>
          <td width="80%">&nbsp;<%=Customer%></td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td><div align="right">客户地点:</div></td>
          <td width="80%">&nbsp;<%=ke_add%></td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td><div align="right">客户电话:</div></td>
          <td width="80%">&nbsp;<%=ke_tel%></td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td><div align="right">折扣率:</div></td>
          <td width="80%">&nbsp;<%=(Discount/100)*Money%></td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td><div align="right">销售数量:</div></td>
          <td width="80%">&nbsp;<%=Out_ShuLiang%></td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td><div align="right">销收款:</div></td>
          <td width="80%">&nbsp;<%=(Discount/100)*Money*Out_ShuLiang%></td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td><div align="right">预收订金:</div></td>
          <td width="80%">&nbsp;<%=DingJin%></td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td><div align="right">预收款比例:</div></td>
          <td width="80%">&nbsp;<%=Left(100*DingJin/((Discount/100)*Money*Out_ShuLiang),5) & "%"%></td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td><div align="right">物流:</div></td>
          <td width="80%">&nbsp;<%=WuLiu%></td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td><div align="right">运费:</div></td>
          <td width="80%">&nbsp;<%=YunFei%></td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td><div align="right">备注:</div></td>
          <td> <table width="100%" border="0" cellpadding="2" cellspacing="0">
              <tr> 
                <td><%=Mone%></td>
              </tr>
            </table></td>
        </tr>
        <tr bgcolor="#FFFFFF"> 
          <td height="30" colspan="2"> <div align="center"> 
              <input type="button" name="Submit" value="关闭窗口" onClick="javascript:window.close();">
            </div></td>
        </tr>
      </table></td>
  </tr>
</table>
 </body>
</html>

⌨️ 快捷键说明

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