accountmodifysave.asp

在线经销商回单管理系统在线经销商回单管理系统

<%@language=vbscript codepage=936 %>
<!--#include file="conn.asp"-->
<!--#include file="admin.asp"-->
<!--#include file="Inc/Function.asp"-->
<% 
id=request("id")
pinming=request("pinming")
lingdanhao=request("lingdanhao")
lingyongshuliang=request("lingyongshuliang")
shoujianriqi=request("shoujianriqi")
tuidanhao=request("tuidanhao")
tuihuishuliang=request("tuihuishuliang")
beizhu=request("beizhu")
jxs=request("jxs")
jxsid=request("jxsid")
dim Rs
Set Rs=Server.CreateObject ("adodb.recordset")
sql="select pinming,lingdanhao,lingyongshuliang,shoujianriqi,tuidanhao,tuihuishuliang,beizhu,jxs,jxsid,receiptStatus from account where id="&Id
Rs.open Sql,conn,1,3
Rs("pinming")=pinming
Rs("lingdanhao")=lingdanhao
Rs("lingyongshuliang")=lingyongshuliang
Rs("shoujianriqi")=shoujianriqi
Rs("tuidanhao")=tuidanhao
Rs("tuihuishuliang")=tuihuishuliang
Rs("beizhu")=beizhu
Rs("jxs")=jxs
Rs("jxsid")=jxsid
Rs("receiptStatus")=1
Rs.update
Rs.close
Set Rs=Nothing
response.Write "<script lanage=javascript>alert('修改成功');window.location.href='account_manage.asp';</script>"


 %>