upsellnote1.asp

很不错的进销存系统, 本系统适用于轮胎经销使用

<!--#include file=conn.asp-->
<link href="css.css" rel="stylesheet" type="text/css">
<table width="100%" class="inputb"><tr><td align=center>查看修改销售记录</td></tr></table>
<center><form name=addform action="change_Sellnote.asp" method="post">
<table border="0" width="600">
<%
id=request("id")
if id="" then
response.write"请选择要查看或修改的记录！"
response.end
elseif isnumeric(id)=false then
response.write"参数错误！"
response.end
else
Set rs_g=Server.createobject("adodb.recordset")
Sqlstr="select * from ChuKu where id="&id
rs_g.open sqlstr,conn,1,1
if rs_g.eof then
response.write"参数错误！"
response.end
end if
end if
'*******接收ID打开游标完毕*************

response.write"<input name=spid type=hidden value="&rs_g("id")&">"
response.write"<tr bgcolor=#efefef><td>商品名称：<input name=sppp type=text class=inputb value="&rs_g("pinpai")&">&nbsp;"
Set rs=Server.createobject("adodb.recordset")
Sql="Select * from ppname where pporder>0 order by pporder"
rs.open Sql,conn,1,1
response.write"<select name='ppselect' class=inputa onChange='document.addform.sppp.value=(this.options[this.selectedIndex].value)'>"
response.write"<option selected>请选择品牌</option>"
while not rs.eof
response.write"<option value="&rs("name")&">"&rs("name")&"</option>"
rs.movenext
wend
rs.close
response.write"</td></tr>"

response.write"<tr bgcolor=#efefef><td>商品规格：<input name=ggname type=text value="&rs_g("guige")&">&nbsp;"
Sql1="Select * from ppname where ggorder>0 order by ggorder"
rs.open sql1,conn,1,1
response.write"<select name=ggselect onChange='document.addform.ggname.value=this.options[this.selectedIndex].value'>"
response.write"<option selected>请选择规格</option>"
while not rs.eof
response.write"<option value="&rs("name")&">"&rs("name")&"</option>"
rs.movenext
wend
rs.close
response.write"</td></tr>"

response.write"<tr bgcolor=#efefef><td>商品型号：<input name=xhname type=text value="&rs_g("xinghao")&">&nbsp;"
Sql2="Select * from ppname where xhorder>0 order by xhorder"
rs.open sql2,conn,1,1

response.write"<select name=xhselect onChange='document.addform.xhname.value=this.options[this.selectedIndex].value'>"
response.write"<option selected>请选择型号</option>"
while not rs.eof
response.write"<option value="&rs("name")&">"&rs("name")&"</option>"
rs.movenext
wend
rs.close
response.write"</td></tr>"
%>
<tr bgcolor=#efefef><td>商品数量：<input name="shuliang" type="text" value=<%=rs_g("shuliang")%>></td></tr>
<tr bgcolor=#efefef><td>商品单价：<input name="danjia" type="text" value=<%=rs_g("danjia")%>></td></tr>
<tr bgcolor=#efefef><td>商品标码：<input name="biaoma" type="text" size="50" value=<%=rs_g("biaoma")%>>*如果是多个请用｜分开填写！</td></tr>
<tr bgcolor=#efefef><td>销售客户：<input name="kehu" type="text" value=<%=rs_g("kehu")%>></td></tr>
<%if rs_g("fukuan")="已付" then%>
<tr bgcolor=#efefef><td>是否付款：<input name="fukuan" type="radio" value="已付" checked>是｜否<input name="fukuan" type="radio" value="未付">｜未付清<input name="fukuan" type="radio" value="未付清">
<% elseif rs_g("fukuan")="未付" then %>
<tr bgcolor=#efefef><td>是否付款：<input name="fukuan" type="radio" value="已付">是｜否<input name="fukuan" type="radio" value="未付"  checked>｜未付清<input name="fukuan" type="radio" value="未付清">
<%else%>
<tr bgcolor=#efefef><td>是否付款：<input name="fukuan" type="radio" value="已付">是｜否<input name="fukuan" type="radio" value="未付">｜未付清<input name="fukuan" type="radio" value="未付清" checked>
<tr bgcolor=#efefef><td>已经支付：<input name="zanfu" type="text" value=<%=rs_g("zanfu")%>></td></tr>
<% end if%>
<tr bgcolor=#efefef><td>销售员工：<input name="username" type="text" value=<%=rs_g("username")%>></td></tr>
<tr bgcolor=#efefef><td>销售时间：<input name="intime" type="text" value=<%=rs_g("intime")%>></td></tr>
<tr bgcolor=#efefef><td>销售备注：<textarea name="beizhu" rows="2"><%=rs_g("beizhu")%></textarea></td></tr>
<tr bgcolor=#efefef><td><input name="submit" type="submit" class="inputb" value="确定修改">&nbsp<input name="submit2" type="reset" value="取消修改" class="inputb"></td></tr>
</table></form></center>