📄 newprice.asp
字号:
<!--#include file="../config.ini" -->
<!--#include file="../commfunction.inc" -->
<%
Dim objcheck
Set objcheck=Server.CreateObject("SmartSales.CheckFunction")
objcheck.CheckUserFunction "poprice","edit"
set objcheck=nothing
dim conn
set conn=server.CreateObject("adodb.connection")
conn.Open connstring
if Request("id")<>"" then
sql="select * from poprice where priceid="&Request("id")
set rs=conn.Execute(sql)
if rs.eof then
Response.Write "找不到记录"
Response.End
end if
productid=rs("productid")
productcode=getfieldvalue("product","productid",rs("productid"),"productcode")
model=getfieldvalue("product","productid",rs("productid"),"model")
retail_price=rs("retail_price")
discount1=rs("discount")
productprice1=rs("price")
description=rs("description")
disable=rs("disable")
account=rs("accountid")
accountname=getfieldvalue("account","accountid",rs("accountid"),"account")
specialpriceno=rs("specialpriceno")
qty11=rs("qty1")
qty12=rs("qty2")
qty13=rs("qty3")
discount11=rs("discount1")
discount12=rs("discount2")
discount13=rs("discount3")
price11=rs("price1")
price12=rs("price2")
price13=rs("price3")
else
discount1=100
discount11=100
discount12=100
discount13=100
account=-1
disable=false
end if
if Request.Form ("discount1")<>"" then
Dim objprice
Set objprice=Server.CreateObject("SmartSales.Price")
objprice.SavePrice
set objprice=nothing
%>
<script language=javascript>
window.opener.location.reload();
window.close();
</script>
<%
end if
%>
<html>
<head>
<LINK href="../global.css" rel=STYLESHEET type=text/css>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>采购价格政策</title>
</head>
<script language=javascript>
//window.top.frames (1).document.location='../left.asp?type=product';
</script>
<body leftmargin="10" rightmargin="10" topmargin="10">
<%'产品-客户-价格#############################################################################################################
if Request("type")="productaccount" or Request("type")="" then%>
<form name="form1" id="form1" method="post" action="">
<table width="100%" border="0" cellpadding="0" cellspacing="1" bgcolor="FFFFFF" align="center">
<tr>
<td height="25" colspan=3><div align="left"><strong><font size="2" class=title>按产品与供应商制定采购价格</font></strong></div></td>
<td height="25" align="right"> <select name="strfield" onchange="chgselect();">
<option value=productaccount <%if request.querystring("type")="productaccount" then Response.Write "selected"%>>按产品与供应商</option>
<option value=productqty <%if request.querystring("type")="productqty" then Response.Write "selected"%>>按产品与数量</option>
</select> </td>
</tr>
<tr>
<td height="16" colspan="4" background="../images/title.gif"> </td>
</tr>
<tr>
<td colspan="4" height=4></td>
</tr>
<tr valign="middle">
<td height="25" colspan="4" align=center><div align=center> <img src="../images/button_history.gif" style="cursor:hand" border=0 onClick="JavaScript:if(form1.product1.value==''){alert('请选择产品')}else {opensubwin6('form1','quoteandorder',form1.product1.value,form1.account.value)}">
<img src="../images/button_save.gif" style="cursor:hand" border=0 onclick="save2();">
<img src="../images/button_cancel.gif" style="cursor:hand" border=0 onclick="window.close();">
</div></td>
</tr>
<tr valign="middle">
<td height="25" align=center bgcolor="DEDFDE">供应商</td>
<td height="25" colspan="3" bgcolor="efefef"> <div align="left">
<input name="account" type="hidden" size="20" value=<%=account%>>
<input name="accountname" type="text" size="14" value="<%=accountname%>" readonly>
<input type="button" name="bnaccount" onClick="JavaScript:opensubwin2('form1','account')" value=... class=black>
</div></td>
</tr>
<tr valign="middle">
<td height="25" align=center bgcolor="DEDFDE">型号</td>
<td height="25" bgcolor="efefef"><div align="left"> <font color=red>
<div name="product1name" id="product1name"><%=model%></div>
</font> </div></td>
<td height="25" bgcolor="DEDFDE"><div align="center">特价编号</div></td>
<td height="25" bgcolor="efefef"><input type=text name="specialpriceno" size=12 value=<%=specialpriceno%>></td>
</tr>
<tr valign="middle">
<td width="15%" height="25" align=center bgcolor="DEDFDE">货号</td>
<td width="35%" height="25" align=left bgcolor="efefef"> <input type=hidden name=product1 value=<%=productid%>>
<input type=text name=code1 size=14 readonly value="<%=productcode%>">
<input type=button name=bproduct1 onClick="JavaScript:opensubwin4('form1','product1','code1','price1')" value="..." class=black>
</td>
<td width="15%" height="25" align=center bgcolor="DEDFDE">单价</td>
<td width="35%" height="25" align=center bgcolor="efefef"> <div align="left">
<input type=text name="price1" size=12 readonly value=<%=retail_price%>>
</div></td>
</tr>
</table>
<table width="100%" border="0" cellpadding="0" cellspacing="1" bgcolor="FFFFFF" align="center">
<tr align="left" valign="bottom" bgcolor="FFFFFF">
<td height="25" colspan="6"> 价格明细</td>
</tr>
<tr valign="middle">
<td width="15%" height="25" align=center bgcolor="DEDFDE">折扣</td>
<td width="18%" height="25" bgcolor="efefef"> <input type=text name=discount1 size=4 onChange="calculateamount(1);" value=<%=discount1%>>
%</td>
<td width="15%" bgcolor="DEDFDE"><div align="center">折扣价</div></td>
<td width="18%" bgcolor="efefef"> <div align="left">
<input type=text name=productprice1 size=12 onChange="recalculateamount(1);" value=<%=productprice1%>>
</div></td>
<td width="15%" height="25" align=center bgcolor="DEDFDE">失效</td>
<td width="18%" height="25" align=center bgcolor="efefef"> <div align="left">
<input type="checkbox" name="disable" value=1 <%if disable=true then Response.Write "checked"%>>
</div></td>
</tr>
<tr valign="middle">
<td height="25" align=center bgcolor="DEDFDE">描述</td>
<td height="25" colspan="5" bgcolor="efefef"><textarea name="description" cols="50" rows="5" id="description"><%=description%></textarea></td>
</tr>
</table>
</form>
<%'产品-数量-价格#############################################################################################################
elseif Request("type")="productqty" then%>
<form name="form1" id="form1" method="post" action="">
<table width="100%" border="0" cellpadding="0" cellspacing="1" bgcolor="FFFFFF" align="center">
<tr>
<td height="25" colspan=3><div align="left"><strong><font size="2" class=title>按产品与数量制定销售价格</font></strong></div></td>
<td height="25" align="right"> <select name="strfield" onchange="chgselect();">
<option value=productaccount <%if request.querystring("type")="productaccount" then Response.Write "selected"%>>按产品与供应商</option>
<option value=productqty <%if request.querystring("type")="productqty" then Response.Write "selected"%>>按产品与数量</option>
</select> </td>
</tr>
<tr>
<td height="16" colspan="4" background="../images/title.gif"> </td>
</tr>
<tr>
<td colspan="4" height=4></td>
</tr>
<tr valign="middle">
<td height="25" colspan="4" align=center><div align=center> <img src="../images/button_history.gif" style="cursor:hand" border=0 onClick="JavaScript:if(form1.product1.value==''){alert('请选择产品')}else {opensubwin6('form1','quoteandorder',form1.product1.value,form1.account.value)}">
<img src="../images/button_save.gif" style="cursor:hand" border=0 onclick="save3();">
<img src="../images/button_cancel.gif" style="cursor:hand" border=0 onclick="window.close();">
</div></td>
</tr>
<tr valign="middle">
<td height="25" align=center bgcolor="DEDFDE">供应商</td>
<td height="25" colspan="3" bgcolor="efefef"><input name="account" type="hidden" size="20" value=<%=account%>>
<input name="accountname" type="text" size="14" value="<%=accountname%>" readonly>
<input type="button" name="bnaccount" onClick="JavaScript:opensubwin2('form1','account')" value=... class=black>
</td>
</tr>
<tr valign="middle">
<td height="25" align=center bgcolor="DEDFDE">型号</td>
<td height="25" bgcolor="efefef"><div align="left"> <font color=red>
<div name="product1name" id="product1name"><%=model%></div>
</font> </div></td>
<td height="25" bgcolor="DEDFDE"><div align="center">特价编号</div></td>
<td height="25" bgcolor="efefef"><input type=text name="specialpriceno" size=12 value=<%=specialpriceno%>></td>
</tr>
<tr valign="middle">
<td width="15%" height="25" align=center bgcolor="DEDFDE">货号</td>
<td width="35%" height="25" align=left bgcolor="efefef"> <input type=hidden name=product1 value=<%=productid%>>
<input type=text name=code1 size=14 readonly value="<%=productcode%>">
<input type=button name=bproduct1 onClick="JavaScript:opensubwin4('form1','product1','code1','price1')" value="..." class=black>
</td>
<td width="15%" height="25" align=center bgcolor="DEDFDE">单价</td>
<td width="35%" height="25" align=center bgcolor="efefef"> <div align="left">
<input type=text name="price1" size=12 readonly value=<%=retail_price%>>
</div></td>
</tr>
</table>
<table width="100%" border="0" cellpadding="0" cellspacing="1" bgcolor="FFFFFF">
<tr valign="bottom" bgcolor="#FFFFFF">
<td height="25" colspan="6"> 价格明细</td>
</tr>
<tr>
<td width="15%" height="25" align="center" bgcolor="DEDFDE">数量1</td>
<td width="18%" bgcolor="efefef"> <input type=text name=qty1 size=8 value=<%=qty11%>></td>
<td width="15%" bgcolor="DEDFDE"> <div align="center">折扣1</div></td>
<td width="18%" align="left" bgcolor="efefef"> <div align="LEFT">
<input type=text name=discount1 size=4 onChange="calculateamount(1);" value=<%=discount11%>>
% </div></td>
<td width="15%" bgcolor="DEDFDE"> <div align="center">折扣价1 </div></td>
<td nowrap bgcolor="efefef"> <div align="LEFT">
<input type=text name=productprice1 size=8 onChange="recalculateamount(1);" value=<%=price11%>>
</div></td>
</tr>
<tr>
<td width="15%" height="25" align="center" bgcolor="DEDFDE">数量2</td>
<td width="18%" bgcolor="efefef"> <input type=text name=qty2 size=8 value=<%=qty12%>></td>
<td width="15%" bgcolor="DEDFDE"> <div align="center">折扣2</div></td>
<td width="18%" align="left" bgcolor="efefef"> <div align="LEFT">
<input type=text name=discount2 size=4 onChange="calculateamount(2);" value=<%=discount12%>>
%</div></td>
<td width="15%" bgcolor="DEDFDE"> <div align="center">折扣价2 </div></td>
<td align="LEFT" nowrap bgcolor="efefef"> <input type=text name=productprice2 size=8 onChange="recalculateamount(2);" value=<%=price12%>>
</td>
</tr>
<tr>
<td width="15%" height="25" align="center" bgcolor="DEDFDE">数量3</td>
<td width="18%" bgcolor="efefef"> <input type=text name=qty3 size=8 value=<%=qty13%>></td>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -