📄 saledetaillist.asp
字号:
<!--#include file="../function/connect.asp"-->
<%
Client_ID=request("Client_ID")
if Client_ID<>"" then
session("Client_ID")=Client_ID
end if
if Client_ID="" and session("Client_ID")<>"" then
Client_ID=session("Client_ID")
end if
if Client_ID="all" then
Client_ID=""
end if
meth=request("meth")
if meth="del" and request("Order_Detail_ID")<>"" then
strsql="delete from OrderDetails where Order_Detail_ID in (" & request("Order_Detail_ID") &")"
objConn.execute strsql
end if
strsql="select p.order_num as order_num1,p.sale_Date as sale_Date1,od.*,cl.client_name,co.Contact_Name,di.Invoice,dc.Currency_Name,Products.product_name,Products.product_sale_price,Products.product_unit,c1.cat1_name,c2.cat2_name from OrderDetails od,SalesOpportunities p,clients cl,Contacts co,Dict_Invoices di,Dict_Currency dc,cat1 c1,cat2 c2,products where p.client_ID=cl.client_ID and p.Contact_ID=co.Contact_ID and di.Invoice_ID=p.Invoice_ID and dc.Currency_ID=p.Currency_ID and od.Sales_OPP_ID=p.Sales_OPP_ID and od.Product_Category_ID=c1.cat1_id and c2.cat2_id=od.Product_CategoryII_ID and products.product_id=od.Product_ID "
'response.write strsql
Set objRs = Server.CreateObject("adodb.recordset")
objRs.Open strsql,objConn,1,1
%>
<html>
<head>
<title>产品</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href="../cssD.css" rel=stylesheet>
<script>
function checkNum()
{
rNum=0;
var actID=document.all.Order_Detail_ID;
for(i=1;i<actID.length;i++){
if(actID[i].checked==true){
rNum=rNum +1 ;
}
}
return rNum;
}
function checkAll()
{
var actID=document.all.Order_Detail_ID;
if(document.form1.checkall.checked==false){
for(i=0;i<actID.length;i++){
actID[i].checked=false;
}
}else{
for(i=0;i<actID.length;i++){
actID[i].checked=true;
}
}
}
function modify()
{
if(checkNum()!=1)
{
alert('修改的项目只能是一个.');
}else{
document.form1.action="Purchase.asp";
document.form1.submit();
}
}
</script>
</head>
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="103%" border="1" cellspacing="0" cellpadding="2" bordercolorlight='#000000' bordercolordark='#FFFFFF'>
<form name="form1" method="post" action="Purchasedetaillist.asp">
<tr class="tablehead">
<td width="4%"><input type="checkbox" name="checkall" value="1" onclick="checkAll();"><input type="checkbox" name="Order_Detail_ID" value="0" disabled style="display:none;"></td>
<td width="8%" nowrap>
<div align="center">进货单号</div>
</td>
<td width="8%" nowrap>
<div align="center">进货日期</div>
</td>
<td width="10%" nowrap>
<div align="center">产品供应商</div>
</td>
<td width="8%" nowrap>
<div align="center">相关联系人</div>
</td>
<td width="8%" nowrap>
<div align="center">产品大类</div>
</td>
<td width="8%" nowrap>
<div align="center">产品小类</div>
</td>
<td width="10%" nowrap>
<div align="center">产品</div>
</td>
<td width="8%" nowrap>
<div align="center">单价</div>
</td>
<td width="8%" nowrap>
<div align="center">进货数量</div>
</td>
<td width="8%" nowrap>
<div align="center">折扣</div>
</td>
<td width="8%" nowrap>
<div align="center">金额</div>
</td>
</tr>
<%if not objrs.eof then
do while not objrs.eof
%>
<tr align="center">
<td width="4%" class="tablehead">
<input type="checkbox" name="Order_Detail_ID" value="<%=objrs.fields("Order_Detail_ID")%>">
</td>
<td width="8%" nowrap> <a href="purchase.asp?Sales_OPP_ID=<%=objrs.fields("Sales_OPP_ID")%>"><%=objrs.fields("order_num1")%></a></td>
<td width="8%" nowrap> <%=objrs.fields("sale_Date1")%></td>
<td width="10%" nowrap> <%=objrs.fields("client_name")%></td>
<td width="8%" nowrap> <%=objrs.fields("Contact_Name")%></td>
<td width="8%" nowrap> <%=objrs.fields("cat1_name")%></td>
<td width="8%" nowrap> <%=objrs.fields("cat2_name")%></td>
<td width="10%" nowrap> <%=objrs.fields("product_name")%></td>
<td width="8%" nowrap> <%=objrs.fields("Unit_Price")%></td>
<td width="8%" nowrap> <%=objrs.fields("Quantity")%><%=objrs.fields("product_unit")%></td>
<td width="8%" nowrap> <%=objrs.fields("Discount")%>%</td>
<td width="8%" nowrap> <%=objrs.fields("Amount")%></td>
</tr>
<%
objrs.movenext
loop
else%>
<tr align="center">
<td colspan="12">
没有销售明细
</td>
</tr>
<%end if%>
<input type="hidden" name="meth" value="del">
<tr align="center">
<td colspan="12">
<input type="submit" value=" 删除 " class="button">
</td>
</tr>
</form>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -