ok-xiugai.asp

电子商务系统Easy_Buy是一个在线销售系统

<!--#include file="0.asp"-->
<!--#include file="../../conn/conn.asp" -->
<!--#include file="../../conn/nosql.asp" -->
<%if Request("id")="" then
Response.Write "系统拒绝了您的操作请求"
response.end
end if
'set rs = conn.execute("select * from sj_xianzhi where lx=0 and id="&clng(request("id"))&" and datediff(n,sj,getdate())<=30")
'if rs.eof then
'response.write "<br>您添加的该条产品信息的时间已经超过默认的30分钟修改时间限制，产品信息已自动进入锁定状态拒绝修改。如果您的产品信息出现错误您可将该条产品信息隐藏。"
'response.end
'end if
'rs.close
Set s= Server.CreateObject("abodb.recordset")
lbid=clng(request("lbid"))
xlbid=clng(request("xlbid"))
slb=nosql(replace(request("slb"),"'",""))
mc=nosql(replace(request("mc"),"'",""))
js=nosql(replace(request("js"),"'",""))
jp=nosql(replace(request("jp"),"'",""))
bao=nosql(replace(request("bao"),"'",""))
jg1=FormatNumber(ccur(request("jg1")),2)
jg2=FormatNumber(ccur(request("jg2")),2)
jg3=FormatNumber(ccur(request("jg3")),2)
xt=nosql(replace(request("xt"),"'",""))
zt=nosql(replace(request("zt"),"'",""))
dt=nosql(replace(request("dt"),"'",""))
cj=nosql(replace(request("cj"),"'",""))
userlb=nosql(replace(request("userlb"),"'",""))
If request("xt")="" then
	xt="xt.gif"
end if
If request("zt")="" then
	zt="zt.gif"
end if
If request("dt")="" then
	dt="zt.gif"
end if
If request("cang")="" then
	cang=0
end if
set rs = conn.execute("select id from user_name where name='"&nosql(session("www.wygk.cn"))&"'")
userid=rs("id")
rs.close
set rs = conn.execute("select userid from chanpin where id="&clng(Request("id"))&"")
userid2=rs("userid")
rs.close
if userid=userid2 then
set rs=server.createobject("adodb.recordset")
sql="select * from chanpin where id="&clng(request("id"))&"" 
rs.open sql,conn,1,3
rs("lbid")=lbid
rs("xlbid")=xlbid
rs("slb")=slb
rs("userlb")=userlb
rs("mc")=mc
rs("jg1")=jg1
rs("jg2")=jg2
rs("jg3")=jg3
rs("jp")=jp
rs("bao")=bao
For i = 1 To Request.Form("js").Count 
strDetail = strDetail & Request.Form("js")(i) 
Next 
Set s= Server.CreateObject("abodb.recordset")
rs("js")=strDetail
rs("xt")=xt
rs("zt")=zt
rs("dt")=dt
rs("cj")=cj
rs("cang")=cang
rs.update
rs.close
Response.Write "<script>alert(""修改产品成功"");location.href=""guanli.asp?page="&request("page")&"&keywords="&request("keywords")&""";</script>"
else
Response.Write("对不起，您不能删除该条产品信息。如有疑问请与网站管理员联系。")
end if
%>