cp_edit_save.asp

购物网站源码有需要的赶快下载机不可失

<!--#include file="top.asp"-->
<%if userflag1=0 then
response.redirect"ok.asp?action=flag"
end if

did=request("did")
cpname=Request("cpname")
sortid=Request("sortid")
cpjg=Request("cpjg")
cpjl=Request("cpjl")
jgdw=request("jgdw")
cpbh=request("cpbh")
if cpbh="" then cpbh=null
cpcd=request("cpcd")
if cpcd="" then cpcd=null
cpgg=request("cpgg")
if cpgg="" then cpgg=null
cpjm=request("cpjm")
cpsm=request("cpsm")
if cpsm="" then cpsm="暂无"
pic=Request("magicfacepic(1)")
if pic="" then pic="img/null.bmp"

set rs=Server.CreateObject("Adodb.Recordset")
sql="select * from SMT_cp where SMT_id="&did
rs.open sql,conn,1,1
aaa=rs("SMT_ypxxone_id")
bbb=rs("SMT_ypxxtwo_id")
rs.close
if request("ypxxtwo_id")="" then
ypxxone_id=aaa
ypxxtwo_id=bbb
else
ypxxone_id=request("ypxxone_id")
ypxxtwo_id=request("ypxxtwo_id")
end if

set rs=Server.CreateObject("Adodb.Recordset")
sql="select * from SMT_cp where SMT_id="&did&" and SMT_yp_id="&session("id")
rs.open sql,conn,1,3

if userflag1=0 then
errstyle="·对不起，此功能已对"&vipshow&"关闭！"
scripterr
end if

rs("SMT_pic")=pic
rs("SMT_cpname")=cpname
rs("SMT_sortid")=sortid
rs("SMT_cpjg")=cpjg
rs("SMT_cpjgdw")=jgdw
rs("SMT_cpjl")=cpjl
rs("SMT_cpbh")=cpbh
rs("SMT_cpcd")=cpcd
rs("SMT_cpgg")=cpgg
rs("SMT_ypxxone_id")=ypxxone_id
rs("SMT_ypxxtwo_id")=ypxxtwo_id
rs("SMT_cpjm")=cpjm
rs("SMT_cpsm")=cpsm
rs("SMT_key1")=application("citycpkey")
rs.update
rs.close
set rs=nothing

conn.close
set conn = nothing

if application("citycpkey")=1 then
response.redirect"ok.asp?url=cp.asp"
else
response.redirect"ok.asp?url=cp.asp&key=yes"
end if
%>